一个给select框赋值的问题

skytears1230 2006-12-01 09:21:07
<script language="vbscript">
dim table_element_all(100,100,3)
dim table_all(100)
dim table_all_na(100)
sub changeselect()
dim i,j,k
document.form1.element_select.length = 0
j=document.form1.data_select.selectedIndex
session("tableName")=trim(table_all_na(j))
' k=table_all_na(j)
'response.write("tableName=" & session("tableName"))
for i=0 to table_all(j)-1
set obj=document.createElement("option")
' obj.text=table_element_all(j,i,2)
' obj.value=table_element_all(j,i,1)
obj.value=session("tableName")
obj.text=session("tableName")
document.form1.element_select.add obj

next
end sub
</script>
为什么obj的值用session("tableName")就没有值,如果改成随便的一个普通的数k,就能正常显示?
...全文
178 5 打赏 收藏 转发到动态 举报
写回复
用AI写文章
5 条回复
切换为时间正序
请发表友善的回复…
发表回复
friendlyFour 2006-12-01
  • 打赏
  • 举报
回复
数据岛。也就是xml
skytears1230 2006-12-01
  • 打赏
  • 举报
回复
谢谢楼上的同学。那怎样才能将select所选择的值传到session("tablename")变量呢?
friendlyFour 2006-12-01
  • 打赏
  • 举报
回复
前台不能给后台的值赋值。反过来可以
friendlyFour 2006-12-01
  • 打赏
  • 举报
回复
index.asp
<HTML>
<HEAD>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
</HEAD>
<BODY>

<SCRIPT LANGUAGE="JavaScript">
<!--

function datediff()
{
//运用msxml将前台的值赋给后台的session
var obj = document.all.frm1;
var data = new ActiveXObject("msxml");
data.URL = "GetDateDiff.asp?BeginDate="+obj.txtBeginDate.value+"&EndDate="+obj.txtEndDate.value+"&type=d";
if (data.root.children != null)
{
var strReturn=data.root.children.item(0).text;
}
alert("相差"+strReturn+"天!\n手动刷新一下页面!");
}
//-->
</SCRIPT>
<FORM METHOD=POST ACTION="" name="frm1">
<INPUT TYPE="text" NAME="txtBeginDate" value="2006-01-01"><BR>
<INPUT TYPE="text" NAME="txtEndDate" value="2006-11-01"><BR>
<INPUT TYPE="button" value="时间的差多少日" onclick="datediff()">
<p>
<%
Response.write session("DateDiff")
%>
</p>
</FORM>
</BODY>
</HTML>
----------------------------------
GetDateDiff.asp
<%
strtype=Request.QueryString("type")
BeginDate=Request.QueryString("BeginDate")
EndDate=Request.QueryString("EndDate")
Dim strDay
strDay="<item>"

strDay=strDay&"<DateDiff>"&DateDiff(strtype,BeginDate,EndDate)&"</DateDiff>"

strDay=strDay&"</item>"
session("DateDiff")="相差"&DateDiff(strtype,BeginDate,EndDate)&"天"
%>
<?xml version="1.0" encoding="gb_2312-80"?>
<%=strDay%>
skytears1230 2006-12-01
  • 打赏
  • 举报
回复
我是初学,请楼上的同学能不能说详细点,或者指引个方向,谢谢了

28,391

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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