UC知道ASP数据库插入
来源：百度知道 编辑：UC知道 时间：2024/05/19 11:23:20
ASP+SQL SERVER
值班表,已经在表中循环插入了日期和星期,排班都是有规律的,例如"张三","李四","王麻子",顺序都是这样,怎么样循环插入到表中指定的日期,例如
2008-1-1 张三
2008-1-2 李四
2008-1-3 王麻子
2008-1-4 张三
2008-1-5 李四
2008-1-6 王麻子
^^^^^^^
只有10分了,请大家帮帮我,谢谢了!这个问题烦死俺了~
值班表,已经在表中循环插入了日期和星期,排班都是有规律的,例如"张三","李四","王麻子",顺序都是这样,怎么样循环插入到表中指定的日期,例如
2008-1-1 张三
2008-1-2 李四
2008-1-3 王麻子
2008-1-4 张三
2008-1-5 李四
2008-1-6 王麻子
^^^^^^^
只有10分了,请大家帮帮我,谢谢了!这个问题烦死俺了~
Dim nameList
Dim i
Dim tDate
nameList = Array("张三","李四","王麻子")
sql = "Select * from table order by myDate asc"
'执行获得一个游标RS
i=0
'方法一，逐条执行SQL更新语句
Do While Not RS.EOF
tDate = RS("myDate")
sql = "Update table Set zrName='"& nameList(i) &"' Where myDate=#"& tDate &"#" '注，Sql-Server的时间格式表示可能不是#号，而是单引号，注意修改
'执行SQL语句
i = i+1
if i=3 then i=0
RS.MoveNext
Loop
'方法二，更新内存后再批量更新
'Do While Not RS.EOF
'RS("zrName")=nameList(i)
'i=i+1
'if i=3 then i=0
'RS.MoveNext
'Loop
'RS.update
刚忘了说了，我是用SQLSERVER数据库测试的，如果是ACCESS的数据库，SQL语句的日期条件要加上#，比如tdate=#'"&DateAdd("d",i,tdate)&"'#
－－－－
表名：ceshi
列:tdate '日期
列:uname '值班人员姓名
源码：
<!--#include file=