'以下為連接數據庫的代碼,不用理解,copy就行
set conn = server.CreateObject("ADODB.Connection")
str = "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & server.MapPath("database.mdb")
conn.open str
'構造SQL語句,假設name,sex,position為文本字段,age為數字字段
sql = "INSERT INTO users(name,sex,age,position) VALUES('客戶A','男',35,'公關經理')"
'通過execute方法執行該語句
conn.execute(sql)
%>