update.asp

药品管理系统,本着简洁实用的原则开发

<!--#include file="conn.asp"-->
<%
On Error Resume next
response.charset="GB2312"
session.codepage=936
call admintop()
Set rs=conn.execute("select * from [56770_product]")
Do While Not rs.eof

conn.execute("update [56770_product] set p_kucun="&rs("p_count")&" where p_id="&rs("p_id")&"")
rs.movenext
Loop
rs.close:Set rs=Nothing 
'conn.execute("update [56770_product] set p_price='0' where clng(p_price)=0")
conn.execute("update [56770_product] set p_pfprice='0' where clng(p_pfprice)=0")
conn.execute("update [56770_product] set p_cbprice='0' where p_cbprice=''")
response.write "数据升级成功"
%>