% response.Buffer=true
toda=now()
Set Conn=Server.CreateObject("ADODB.Connection")
Connstr="DBQ="+server.mappath("database/#88hxgx.mdb")+";DefaultDir='';DRIVER={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;ImplicitCommitSync=Yes;MaxBufferSize=512;MaxScanRows=8;PageTimeout=5;SafeTransactions=0;Threads=3;UserCommitSync=Yes;"
Conn.Open connstr
set rs=server.createobject("adodb.recordset")
sql="insert into customer (t1,t2,t3,t4,t5,t6,t7,t8,t9,cdate) values('"&trim(request("t1"))&"','"& trim(request("t2")) &"','"& trim(request("t3")) &"','"& trim(request("t4")) &"','"& trim(request("t5")) &"','"&trim(request("t6")) &"', '"&trim(request("t7")) &"','"&trim(request("t8"))&"', '"&trim(request("t9")) &"','"&toda&"')"
rs.open sql,conn,1,2
%>
:::欢迎您进入华夏创新管理网:::
| |
|
|
销售值班电话:013671057065 ;010-69739713 |
 |
QQ:359252190 E-mail:webmaster@hxcxgl.com |
|
北京鹤鸣景天文化传播有限责任公司2004
|
|
|
|