建设网站以前您必须掌握甚么？
一个好网站域名如何选择？全部权怎样维..
服务器空间能够先使用再支付吗?
建设网站选本人還是精英团队或是选企业？
网站商品材料加上方法方式
为何申请办理好的电子邮箱会只有发不可以收..
企业网站建设前：简易一目了然的提前准备方式
asp 完成数据信息导进方式 隶属归类:网站开发新闻资讯 公布人：步衣互联网 公布時间：2017年十月2七日 已被访问 次 % Server.ScriptTimeOut=950 %
%
Dim startime,conn1,conn2,connstr1,connstr2,db1,db2
startime=timer()
db1="Data\cj_Data.mdb" '数据信息库1
db2="cnhwwdata\##buyiwangluo@#.mdb" '数据信息库2
on error resume next '试着连数据信息库，一直至请求超时，但能够提升SQL引入过虑
connstr1 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath(db1)
connstr2 = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" Server.MapPath(db2)
set conn1=server.createobject("ADODB.CONNECTION")
set conn2=server.createobject("ADODB.CONNECTION")
conn1.Open connstr1
conn2.open connstr2 Dim rs1,rs2,r3
Set Rs1 = Conn1.Execute("Select * From SK_Article")
Do While Not Rs1.Eof Set rs3=Conn2.Execute("Select * from ssort where nclassid=" rs1("ClassID"))
Rs2("anclassid") = rs3("anclassID")'大频道ID=SpecialID，得写个获得
rs3.Close
Set rs3=nothing Rs2("huiyuanjia") = rs1("Author")'创作者=价钱
Rs2.Update
Rs1.MoveNext
Loop
Response.Write "实际操作取得成功"
Response.End
%