ASP分段处理信息
帮招就办做一个就业信息管理系统,需要做一个从外部导入数据库数据的功能.本来一开始打算用简简单单的二重循环,按道理这样就可以搞定,虽然效率比较低,但是很容易实现.
结果发现这个懒是偷不了的,因为招就办的学生信息少说3、4kk,动辄超过你平时的想象,总之已经够撑爆提供ASP解析的IIS的缓冲池限制了,典型的现象就是提示 '80020009',甚至提示'80020009' 连错误提示都没，于是乎只有分段查询了。
代码片段:
'n=1
str="select * from tdd"
rsa2.open str,conn2,1,1
alldatacount=rsa2.recordcount
rsa2.close
'////////////////////////第一种分段查询方法失败
'do until n*4000-alldatacount>4000
'tempcount=n*4000
'lasttime=(n-1)*4000
'if tempcount<alldatacount then
'thistime=tempcount
'else
'thistime=alldatacount
'end if
'n=n+1
'rsa2.move thistime-1
'////////////////////////第一种分段查询方法失败
Sub Pause(Pause_Second)
if Pause_Second=0 then Pause_Second=1'秒
lStep=200000
'如果为0或者非数值则不限制
If Not IsNumeric(Pause_Second) OR Pause_Second=0 Then Exit Sub
Pause_Second=CLNG(Pause_Second)
If Pause_Second>100 Then Pause_Second=100
For i=1 To Pause_Second * lStep
Next
End Sub
'////////////////////////第二种分段查询方法失败
'for k=0 to 6
'call Pause(5)
'upcount=(k+1)*1000
'downcount=k*1000
'str="select * from tdd where id<"&upcount&" and id>"&downcount&""
'rsa2.open str,conn2,1,1
'////////////////////////第二种分段查询方法失败
'////////////////////////下面使用第三种分段查询方法 提供交互式界面
str="select * from tdd"
rs1.open str,conn,3,3 '这里是需要修改的表
nowdatacount=rs1.recordcount
rs1.close
str="select * from tdd where id<"&upcount&" and id>"&downcount&""
rsa2.open str,conn2,1,1
maxnum=rsa2.recordcount
if rsa2.eof then
%>数据已经导入完毕 当前数据库包含<%=nowdatacount%>条信息<%
else
%>当前正在处理<%=downcount%>到<%=upcount%>数据（本次任务：<%=alldatacount%>）,当前数据库含有：<%=nowdatacount%>，请耐心等待...<%
for ii=0 to rsa2.recordcount-1
str="select * from tdd Where 学号='"&rsa2("学号")&"'"
rs1.open str,conn,3,3 '这里是需要修改的表
if rs1.eof then
rs1.addnew
rs1("学号")=rsa2("学号")
rs1("ksh")=rsa2("考生号")
rs1("准考证号")=rsa2("准考证号")
rs1("姓名")=rsa2("姓名")
rs1("性别代码")=rsa2("性别代码")
rs1("性别")=rsa2("性别")
rs1("民族代码")=rsa2("民族代码")
rs1("民族")=rsa2("民族")
rs1("政治面貌代码")=rsa2("政治面貌代码")
rs1("政治面貌")=rsa2("政治面貌")
rs1("学历代码")=rsa2("学历代码")
rs1("学历")=rsa2("学历")
rs1("专业代码")=rsa2("专业代码")
rs1("专业")=rsa2("专业")
rs1("培养方式代码")=rsa2("培养方式代码")
rs1("培养方式")=rsa2("培养方式")
rs1("生源所在地代码")=rsa2("生源所在地代码")
rs1("生源所在地")=rsa2("生源所在地")
rs1("入学年份")=rsa2("入学年份")
rs1("毕业时间")=rsa2("毕业时间")
rs1("毕业去向代码")=rsa2("毕业去向代码")
rs1("毕业去向")=rsa2("毕业去向")
rs1("委培定向单位")=rsa2("委培定向单位")
rs1("委培定向单位所在地代码")=rsa2("委培定向单位所在地代码")
rs1("委培定向单位所在地")=rsa2("委培定向单位所在地")
rs1("接收单位隶属部门代码")=rsa2("接收单位隶属部门代码")
rs1("单位隶")=rsa2("接收单位隶属部门")
rs1("接收单位所在地代码")=rsa2("接收单位所在地代码")
rs1("接收单位所在地")=rsa2("接收单位所在地")
rs1("接收单位性质代码")=rsa2("接收单位性质代码")
rs1("接收单位性质")=rsa2("接收单位性质")
rs1("xysh")=rsa2("协议书编号")
rs1("毕业证号")=rsa2("毕业证号")
rs1("身份证号")=rsa2("身份证号")
rs1("是否一次就业")=rsa2("是否一次就业")
rs1("是否出省就业")=rsa2("是否出省就业")
rs1("备注")=rsa2("备注")
rs1("扩展项一")=rsa2("扩展项一")
rs1("扩展项二")=rsa2("扩展项二")
rs1("扩展项三")=rsa2("扩展项三")
rs1("扩展项四")=rsa2("扩展项四")
rs1("扩展项五")=rsa2("扩展项五")
rs1("档案机要号")=rsa2("档案机要号")
rs1("档案发往单位")=rsa2("档案发往单位")
rs1("收档单位邮编")=rsa2("收档单位邮编")
rs1("收档单位地址")=rsa2("收档单位地址")
rs1("档案是否发出")=rsa2("档案是否发出")
rs1("介绍信办理时间")=rsa2("介绍信办理时间")
rs1("介绍信打印次数")=rsa2("介绍信打印次数")
rs1("联系电话")=rsa2("联系电话")
rs1("手机号码")=rsa2("手机号码")
rs1("电子邮箱")=rsa2("电子邮箱")
rs1("家庭地址")=rsa2("家庭地址")
rs1("家庭电话")=rsa2("家庭电话")
rs1("邮政编码")=rsa2("邮政编码")
rs1("业余兴趣")=rsa2("业余兴趣")
rs1("特长")=rsa2("特长")
rs1("出生年月")=rsa2("出生年月")
rs1("综合测评代码")=rsa2("综合测评代码")
rs1("综合测评")=rsa2("综合测评")
rs1("奖惩类别代码")=rsa2("奖惩类别代码")
rs1("奖惩类别")=rsa2("奖惩类别")
rs1("成绩排名")=rsa2("成绩排名")
rs1("婚姻状况代码")=rsa2("婚姻状况代码")
rs1("婚姻状况")=rsa2("婚姻状况")
rs1.update
rs1.close
else
rs1("学号")=rsa2("学号")
rs1("ksh")=rsa2("考生号")
rs1("准考证号")=rsa2("准考证号")
rs1("姓名")=rsa2("姓名")
rs1("性别代码")=rsa2("性别代码")
rs1("性别")=rsa2("性别")
rs1("民族代码")=rsa2("民族代码")
rs1("民族")=rsa2("民族")
rs1("政治面貌代码")=rsa2("政治面貌代码")
rs1("政治面貌")=rsa2("政治面貌")
rs1("学历代码")=rsa2("学历代码")
rs1("学历")=rsa2("学历")
rs1("专业代码")=rsa2("专业代码")
rs1("专业")=rsa2("专业")
rs1("培养方式代码")=rsa2("培养方式代码")
rs1("培养方式")=rsa2("培养方式")
rs1("生源所在地代码")=rsa2("生源所在地代码")
rs1("生源所在地")=rsa2("生源所在地")
rs1("入学年份")=rsa2("入学年份")
rs1("毕业时间")=rsa2("毕业时间")
rs1("毕业去向代码")=rsa2("毕业去向代码")
rs1("毕业去向")=rsa2("毕业去向")
rs1("委培定向单位")=rsa2("委培定向单位")
rs1("委培定向单位所在地代码")=rsa2("委培定向单位所在地代码")
rs1("委培定向单位所在地")=rsa2("委培定向单位所在地")
rs1("接收单位隶属部门代码")=rsa2("接收单位隶属部门代码")
rs1("单位隶")=rsa2("接收单位隶属部门")
rs1("接收单位所在地代码")=rsa2("接收单位所在地代码")
rs1("接收单位所在地")=rsa2("接收单位所在地")
rs1("接收单位性质代码")=rsa2("接收单位性质代码")
rs1("接收单位性质")=rsa2("接收单位性质")
rs1("xysh")=rsa2("协议书编号")
rs1("毕业证号")=rsa2("毕业证号")
rs1("身份证号")=rsa2("身份证号")
rs1("是否一次就业")=rsa2("是否一次就业")
rs1("是否出省就业")=rsa2("是否出省就业")
rs1("备注")=rsa2("备注")
rs1("扩展项一")=rsa2("扩展项一")
rs1("扩展项二")=rsa2("扩展项二")
rs1("扩展项三")=rsa2("扩展项三")
rs1("扩展项四")=rsa2("扩展项四")
rs1("扩展项五")=rsa2("扩展项五")
rs1("档案机要号")=rsa2("档案机要号")
rs1("档案发往单位")=rsa2("档案发往单位")
rs1("收档单位邮编")=rsa2("收档单位邮编")
rs1("收档单位地址")=rsa2("收档单位地址")
rs1("档案是否发出")=rsa2("档案是否发出")
rs1("介绍信办理时间")=rsa2("介绍信办理时间")
rs1("介绍信打印次数")=rsa2("介绍信打印次数")
rs1("联系电话")=rsa2("联系电话")
rs1("手机号码")=rsa2("手机号码")
rs1("电子邮箱")=rsa2("电子邮箱")
rs1("家庭地址")=rsa2("家庭地址")
rs1("家庭电话")=rsa2("家庭电话")
rs1("邮政编码")=rsa2("邮政编码")
rs1("业余兴趣")=rsa2("业余兴趣")
rs1("特长")=rsa2("特长")
rs1("出生年月")=rsa2("出生年月")
rs1("综合测评代码")=rsa2("综合测评代码")
rs1("综合测评")=rsa2("综合测评")
rs1("奖惩类别代码")=rsa2("奖惩类别代码")
rs1("奖惩类别")=rsa2("奖惩类别")
rs1("成绩排名")=rsa2("成绩排名")
rs1("婚姻状况代码")=rsa2("婚姻状况代码")
rs1("婚姻状况")=rsa2("婚姻状况")
rs1.update
rs1.close
end if
rsa2.movenext
next
rsa2.close
%><br>本部分操作完成，请稍候....<form action="" method="get" name="form2" id="form1">
<tr>
</span></td>
</tr>
<tr>
<td><div align="center"><input name="Submit" type="submit" class="STYLE3" value="取消操作"></td>
</tr>
</form><%
if request("goonall")<>"" and upcount<alldatacount+100 then
%><meta http-equiv="refresh" content="0.1;url=copy.asp?goonall=ok&goon=<%=upcount-10%>">
<%
end if
end if
end if
'next
'loop
%>