dim conn
dim connstr
on error resume next
mdb="data.mdb"
connstr="Provider=Microsoft.Jet.OLEDB.4.0;DATA Source="&Server.MapPath(mdb)
set conn=server.createobject("ADODB.CONNECTION")
conn.open connstr
sql="insert into user (userid,name)"
sql=sql&"values('2','yangmincong')"
set rs=conn.execute(sql)
conn.close
set conn=nothing
IP卡
狗仔卡
发表于 2010-1-19 04:17:14
收藏
提升卡
置顶卡
沉默卡
喧嚣卡
变色卡
显身卡
发表于 2010-2-7 06:05:05