% If Request.Form("submit")<> "" then strT1=Request.form("textfield") Response.write strT1 ' On error resume next set conn=server.createobject("adodb.connection") conn.open "driver={Microsoft Access Driver (*.mdb)};dbq=f:\aaron\web\htdocs\Nwind.mdb" if err then end if conn.execute "insert into tablename(field1,f2..) values('" & strT1 & "'," & arg2 & ")" if err then msg=err.description end if msg="" set rs=conn.execute("select * from table where " & & ") if rs.eof then else end if rs.close set rs=Nothing conn.close set conn=Nothing end if %>
|
||||||
|
欢迎您订购欧文斯科宁玻璃棉系列产品定货表
请提供以下联系信息:
请提供以下订购信息: 订购数量 产品及说明
|
||||||