如何让数据库中字段的值返回到文本框
dim sql
dim sqla
dim rs
set con=Server.CreateObject("ADODB.Connection")
con.open "DSN=telcom;UID=sa;PWD"
set rs=Server.createobject("adodb.recordset")
sql="select * from day where dt='" & date() & "'"
rs.open sql,con,1,1
if rs.recordcount=0 then
//插入数据语句
con.execute sqla
else
★a1=RS.Fields("one")
★dt=RS.Fields("dt")
end if
rs.close
set rs=nothing
con.close
set con=nothing
我的文本框的名字为a1,dt，可是为什么不能让数据库的值显示在文本框中。
<%
dim sql
dim sqla
dim rs
set con=Server.CreateObject("ADODB.Connection")
con.open "DSN=telcom;UID=sa;PWD"
set rs=Server.createobject("adodb.recordset")
sql="select * from day where dt='" & date() & "'"
rs.open sql,con,1,1
if rs.recordcount=0 then
//插入数据语句
con.execute sqla
else
%>
★<input type="text" name="a1" value="<%=RS.Fields("one")%>">
★<input type="text" name="dt" value="<%=RS.Fields("dt")%>">
<%
end if
rs.close
set rs=nothing
con.close
set con=nothing
%>
这样就OK了，你还是没搞清定界符<%......%>呵呵
asp 和asp.net是不一样的。。。。。
================================================================
Codefund 论坛助手 Ver 1.0 B0402提供下载。 改进了很多，功能完备！
★ 浏览帖子速度极快！[建议系统使用ie5.5以上]。 ★ 多种帖子实现界面。
★ 保存帖子到本地[html格式]★ 监视您关注帖子的回复更新。
★ 可以直接发贴、回复帖子★ 采用XML接口，可以一次性显示4页帖子,同时支持自定义每次显示帖子数量。可以浏览历史记录！
★ 支持在线检测程序升级情况，可及时获得程序更新的信息。
★★ 签名 ●
可以在您的每个帖子的后面自动加上一个自己设计的签名哟。
Http://www.ChinaOK.net/csdn/csdn.zip
Http://www.ChinaOK.net/csdn/csdn.rar
Http://www.ChinaOK.net/csdn/csdn.exe [自解压]
if rs.recordcount=0 then
//插入数据语句
con.execute sqla
else
★a1=RS.Fields("one")
★dt=RS.Fields("dt")
end if
改为：
if rs.recordcount=0 then
//插入数据语句
con.execute sqla
else
response.write "<script language=""javascript"">"
respnse.write "document.all.a1.value="&rs("one")
respnse.write "document.all.dt.value="&rs("dt")
response.write "</script>"
end if
