如何实现无刷新日期时间的级联下拉列表?

alanblack 2005-10-19 09:54:26
rt

新手问题,希望各位能提供一段代码
...全文
611 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
lostevea 2005-12-06
  • 打赏
  • 举报
回复
mark
singlepine 2005-11-01
  • 打赏
  • 举报
回复
http://singlepine.cnblogs.com/articles/266334.html
singlepine 2005-11-01
  • 打赏
  • 举报
回复
<HTML>
<HEAD>
<title>年月日三联动下拉框</title>
<meta http-equiv='Content-Type' content='text/html; charset=gb2312'>
<meta name='author' content='http://singlepine.cnblogs.com/'>
</HEAD>
<body>
<form name="form1">
<select name="YYYY" onchange="YYYYDD(this.value)">
<option value="" selected>请选择 年</option>
</select>
<select name="MM" onchange="MMDD(this.value)">
<option value="" selected>选择 月</option>
</select>
<select name="DD">
<option value="" selected>选择 日</option>
</select>
</form>
<script language="JavaScript"><!--
function YYYYMMDDstart()
{
MonHead = [31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31];

//先给年下拉框赋内容
var y = new Date().getFullYear();
for (var i = (y-30); i < (y+30); i++) //以今年为准,前30年,后30年
document.form1.YYYY.options.add(new Option(" "+ i +" 年", i));

//赋月份的下拉框
for (var i = 1; i < 13; i++)
document.form1.MM.options.add(new Option(" " + i + " 月", i));

document.form1.YYYY.value = y;
document.form1.MM.value = new Date().getMonth() + 1;
var n = MonHead[new Date().getMonth()];
if (new Date().getMonth() ==1 && IsPinYear(YYYYvalue)) n++;
writeDay(n); //赋日期下拉框
document.form1.DD.value = new Date().getDate();
}
if(document.attachEvent)
window.attachEvent("onload", YYYYMMDDstart);
else
window.addEventListener('load', YYYYMMDDstart, false);
function YYYYDD(str) //年发生变化时日期发生变化(主要是判断闰平年)
{
var MMvalue = document.form1.MM.options[document.form1.MM.selectedIndex].value;
if (MMvalue == ""){ var e = document.form1.DD; optionsClear(e); return;}
var n = MonHead[MMvalue - 1];
if (MMvalue ==2 && IsPinYear(str)) n++;
writeDay(n)
}
function MMDD(str) //月发生变化时日期联动
{
var YYYYvalue = document.form1.YYYY.options[document.form1.YYYY.selectedIndex].value;
if (YYYYvalue == ""){ var e = document.form1.DD; optionsClear(e); return;}
var n = MonHead[str - 1];
if (str ==2 && IsPinYear(YYYYvalue)) n++;
writeDay(n)
}
function writeDay(n) //据条件写日期的下拉框
{
var e = document.form1.DD; optionsClear(e);
for (var i=1; i<(n+1); i++)
e.options.add(new Option(" "+ i + " 日", i));
}
function IsPinYear(year)//判断是否闰平年
{
return(0 == year%4 && (year%100 !=0 || year%400 == 0));
}
function optionsClear(e)
{
e.options.length = 1;
}
//-->
</script>
</body>
</HTML>
claus2001 2005-10-20
  • 打赏
  • 举报
回复
mark
alanblack 2005-10-20
  • 打赏
  • 举报
回复
解决了,谢谢各位了
alanblack 2005-10-19
  • 打赏
  • 举报
回复
我也觉得用xmlhttp大材小用了,又没有相关的js代码啊,js我一窍不通啊
singlepine 2005-10-19
  • 打赏
  • 举报
回复
http://community.csdn.net/Expert/topic/4337/4337638.xml?temp=.9106714
helimin19 2005-10-19
  • 打赏
  • 举报
回复
對於日期還說用不著xmlhttp
直接利用js就行了
shoutor 2005-10-19
  • 打赏
  • 举报
回复
使用xmlhttp实现没问题:
http://www.i2key.com/TechDoc/Index.aspx?grads=0&Curpage=1&SearchKey=xmlhttp&CatID=
loveeqing 2005-10-19
  • 打赏
  • 举报
回复
up
singlepine 2005-10-19
  • 打赏
  • 举报
回复
参考
http://community.csdn.net/Expert/topic/4128/4128849.xml?temp=.7169611
中的国家、省/州、城市资料后,少作修改即可
hchxxzx 2005-10-19
  • 打赏
  • 举报
回复
以下是一个参考代码

以下为页面代码:

<form id="Form1" method="post" runat="server">
<asp:DropDownList id="DropDownList1" runat="server"></asp:DropDownList>
<asp:DropDownList id="DropDownList2" runat="server"></asp:DropDownList>
<SCRIPT LANGUAGE="JavaScript">
<!--
//以XML求取数据
function XmlPost(obj)
{
  var svalue = obj.value;
  var webFileUrl = "?brc_id=" + svalue;
  var result = "";
  var xmlHttp = new ActiveXObject("MSXML2.XMLHTTP");
  xmlHttp.open("POST", webFileUrl, false);
  xmlHttp.send("");
  result = xmlHttp.responseText;
  
  if(result != "")
  {
    document.all("DropDownList2").length=0;
    var piArray = result.split(",");
    for(var i=0;i<piArray.length;i++)
    {
      var ary1 = piArray[i].toString().split("|");
      //alert(ary1[0].toString());
      document.all("DropDownList2").options.add(new Option(ary1[1].toString(),ary1[0].toString()));
    }
  }
  else
  {
    alert(result);
  }
}
//-->
</SCRIPT>    
</form>

以下为后台代码:

private System.Data.OleDb.OleDbConnection conn;

private DataTable get_dt(string sql)
{
  string connstr = "Provider=MSDAORA.1;Password=aqjc;User ID=aqjc;Data Source=aqjc";
  this.conn = new OleDbConnection(connstr);
  this.conn.Open();
  OleDbCommand myOleDbCommand = new OleDbCommand(sql,this.conn);
  OleDbDataAdapter myData = new OleDbDataAdapter(myOleDbCommand);

  DataSet myDataset = new DataSet();
  try
  {
    myData.Fill(myDataset);
  }
  catch(Exception ex)
  {
    throw ex;
  }

  this.conn.Close();
  return myDataset.Tables[0];  
}

private void Page_Load(object sender, System.EventArgs e)
{
  string brc_id = this.Request.QueryString["brc_id"];
  if(brc_id + "a" != "a")
  {
    this.down2_bind(brc_id);
  }

  if(!this.IsPostBack)
  {
    this.down1_bind();
  }
}

/// <summary>
/// 返回第2个下拉框需要的值给xmlhttp
/// </summary>
/// <param name="brc_id"></param>
private void down2_bind(string brc_id)
{
  string mystr = "";
  string sql = "select brc_id,brc_name from asm_branch where brc_parentid = '" + brc_id + "'";
  DataTable mytab = this.get_dt(sql);

  if(mytab.Rows.Count != 0)
  {
    for(int i=0;i<mytab.Rows.Count;i++)
    {
      mystr += "," + mytab.Rows[i][0].ToString() + "|" + mytab.Rows[i][1].ToString();
    }
    mystr = mystr.Substring(1);
  }
  this.Response.Write(mystr);
  this.Response.End();
}

/// <summary>
/// 绑定第一个下拉框
/// </summary>
private void down1_bind()
{
  string sql = "select brc_id,brc_name from asm_branch where brc_level = '1'";
  DataTable mytab = this.get_dt(sql);
  this.DropDownList1.DataSource = mytab;
  this.DropDownList1.DataValueField = "brc_id";
  this.DropDownList1.DataTextField = "brc_name";
  this.DropDownList1.DataBind();
  this.DropDownList1.Attributes.Add("onchange","XmlPost(this);");
}






//以下是VB脚本
<SCRIPT LANGUAGE="vbScript">
<!--
'以XML求取数据
function XmlPost(obj)
  dim svalue
  svalue = obj.value
  dim webFileUrl
  webFileUrl = "?brc_id=" + svalue
  dim result
  set xmlHttp = CreateObject("Microsoft.XMLHTTP")
  call xmlHttp.open("POST", webFileUrl, false)
  call xmlHttp.send("")
  result = xmlHttp.responseText

  set downlist = document.all("DropDownList2")

  if result <> "" then
    document.all("DropDownList2").length=0
    dim piArray ,ary1
    piArray = split(result,",")
    for i=0 to piArray.length - 1
      ary1 = split(piArray(i),"|")
      downlist.length = downlist.length + 1
      downlist.options(downlist.length-1).text = ary1(1)
      downlist.options(downlist.length-1).value = ary1(0)
    next
  else
    alert(result)
  end if
end function
//-->
</SCRIPT>
fphuang 2005-10-19
  • 打赏
  • 举报
回复
我有无刷新的代码,楼主如果需要就就留个email地址,并且用短消息通知我吧.
swordragon 2005-10-19
  • 打赏
  • 举报
回复
http://www.7880.com/

62,039

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧