<%
UID=request("UID")
set rs2=serverCreateObject("adodbrecordset")
str2="Select From zk_tuihuo"
rs2open str2,connstr,1,3
rs2addnew
rs2("zkBarcode")=Rs("oBarcode")
rs2("zkBookName")=Rs("oBookName")
rs2("zkTypeName")=Rs("oTypeName")
rs2("zkBookAuthor")=Rs("oBookAuthor")
rs2("zkBookpublished")=Rs("oBookpublished")
rs2("zkBooksCount")=RequestForm("tpcount")
rs2("zkISBN")=RequestForm("ISBN")
rs2("zkPublishyear")=RequestForm("tpdate")
rs2("zkBookID")=RequestForm("BookID")
rs2("zktpto")=RequestForm("tiaopeito")
rs2update
rs2close
set rs2=nothing
set rs=serverCreateObject("adodbrecordset")
str1="select from product_out where otpto='翠微店' and oBarcode='" & UID &"'"
rsopen str1,connstr,1,1
set rs3=serverCreateObject("adodbrecordset")
str3="Select From BookInfo where Barcode='" & UID &"'"
rs3open str3,connstr,1,1
Countr2=rs("oBookleft")
Countr=rs3("Bookleft")
tpcount=RequestForm("tpcount")
count2=Countr2-tpcount
count3=Countr+tpcount
str="update BookInfo set Bookleft="&count3 &" where Barcode='"&UID&"'"
str2="update product_out set oBookleft="&count2 &" where otpto='翠微店' and oBarcode='"&UID&"'"
connexecute(str)
connexecute(str2)
ResponseWrite("<script language:javascript>javascript:windowopener=null;windowclose();</script>")
%>
这样就行了 你试试
你可以刷新一下网页,如果新加的记录还在,那可能是你插入和显示的表与你打开的表不是同一个表,或者两者用的不是同一个mdb文件,这个你也可以反着验证一下,就是在数据库里直接加一条记录,然后刷新网页看能不能显示出来,如果不能,就是说要么你搞错了表,要么你搞错了文件还有一种可能,就是你的数据库在远程服务器上,但你没有FTP上传下载,在你本地的数据库上自然是体现不出改动
Adodc1不是所有sql语句都支持,更新记录用:
Adodc1RecordSource = "Select From Where 客户编号=" & txtNoText '按照客户编号查询到当前记录
Adodc1RecordSetFields("客户名称") = txtNameText '修改当前记录值
Adodc1RecordSetFields("联系地址") = txtAddressText
。。。。
Adodc1RecordSetUpdate
首先需要将excel表导入数据库中,再根据对应关系更新:
关键是先把 excel表导入数据库,可以用bcp来实现
先在数据库中建一个表,结构与lz中的一样,内容为空,然后再用bcp导入
我想这样做
1建空表: select into lz from newlz where 1=2
2导入数据:bcp rsgzlz in D:\lzxls -c -Usa -P+数据库sa密码 -Srsgz -Jcp850
或用SQL数据库导入工具导入
3更新:update rsgznewlz set gjjpjgz=bgjjpjgz
from newlz a,lz b
where agh=bgh
以上就是关于ASP程序 更新数据库记录全部的内容,包括:ASP程序 更新数据库记录、数据库日志中可以查看插入删除更新等 *** 作的记录吗、怎么使用:VB6中使用ADODC更新SQL数据库记录等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)