2.8w+
社区成员
- 主页
两个问题：1.如何在表单的文本输入框中直接显示数据；2.如何插入数据，其中...
1.我想在一个打开的含有表单的页面后，表单中的文本输入框中直接显示某些数据，例如显示当天的日期，操作者的姓名（姓名已知）。
2.如何在一个表中插入一条日期的记录。例如表a1中有两列b1,b2其中b1是字符型数据，b2是日期型数据。我想通过一条SQL语句直接插入一条记录，该记录的两个数值是通过上一页面获得的
下面是我写的语句：可是有错，请问为什么？
wjbh1=request("wjbh")
wjmc1=request("wjmc")
fbrq1=request("fbrq")
fbry1=request("fbry")
wjnr1=request("wjnr")
set cn=server.createobject("adodb.connection")
cn.open "dsn=testdb;uid=sa;pwd="
set rs2=server.createobject("adodb.recordset")
rs2.open "insert into "&glry1&" (sdbh,sdwj,fbrq,fbry,ydps) values('"&wjbh1&"','"&wjmc1&"',"&fbrq1&",'"&fbry2&"','1')",cn,3
其中：sdbh,sdwj,fbry,ydps都是字符型数据，fbrq是日期型数据。系统重视说rs2.open一行错误。
2.如何在一个表中插入一条日期的记录。例如表a1中有两列b1,b2其中b1是字符型数据，b2是日期型数据。我想通过一条SQL语句直接插入一条记录，该记录的两个数值是通过上一页面获得的
下面是我写的语句：可是有错，请问为什么？
wjbh1=request("wjbh")
wjmc1=request("wjmc")
fbrq1=request("fbrq")
fbry1=request("fbry")
wjnr1=request("wjnr")
set cn=server.createobject("adodb.connection")
cn.open "dsn=testdb;uid=sa;pwd="
set rs2=server.createobject("adodb.recordset")
rs2.open "insert into "&glry1&" (sdbh,sdwj,fbrq,fbry,ydps) values('"&wjbh1&"','"&wjmc1&"',"&fbrq1&",'"&fbry2&"','1')",cn,3
其中：sdbh,sdwj,fbry,ydps都是字符型数据，fbrq是日期型数据。系统重视说rs2.open一行错误。
...全文
请发表友善的回复…
发表回复
sportdog 2002-07-30
<input type="text" name="rq" value="<%=now()%>">
<input type="text" name="rq1" value="<%=date()%>">
<input type="text" name="rq1" value="<%=date()%>">
sportdog 2002-07-30
代码如下：
wjbh1=request("wjbh")
wjmc1=request("wjmc")
fbrq1=request("fbrq")
fbry1=request("fbry")
wjnr1=request("wjnr")
set cn=server.createobject("adodb.connection")
cn.open "dsn=testdb;uid=sa;pwd="
sql="insert into table(字段1,字段2,字段3）values('"&变量1&"','"&变量2&"','"&变量3&"')"
cn.execute sql
if err.number<>0 then
response.write sql&"<br>"&err.description
response.end
else
response.write "成功"
end if
wjbh1=request("wjbh")
wjmc1=request("wjmc")
fbrq1=request("fbrq")
fbry1=request("fbry")
wjnr1=request("wjnr")
set cn=server.createobject("adodb.connection")
cn.open "dsn=testdb;uid=sa;pwd="
sql="insert into table(字段1,字段2,字段3）values('"&变量1&"','"&变量2&"','"&变量3&"')"
cn.execute sql
if err.number<>0 then
response.write sql&"<br>"&err.description
response.end
else
response.write "成功"
end if
windows2k 2002-07-30
cn.execute "insert into "&glry1&" (sdbh,sdwj,fbrq,fbry,ydps) values('"&wjbh1&"','"&wjmc1&"','"&fbrq1&"','"&fbry2&"','1')"
青蛙 2002-07-30
你那个rs2.open语法好像有点问题，insert into 后面跟的是数据库名，你列出来的好像是变量名耶，如果你改为数据库名或许可以的。
zyqherozyqhero 2002-07-30
追加一个问题：如何使下面的javascript语句执行后不出现“是否关闭的提示框”：setTimeout("self.close()",10000)
zyqherozyqhero 2002-07-30
追加一个问题：如何使下面的javascript语句执行后不出现“是否关闭的提示框”：setTimeout("self.close()",10000)