รู้เบื้องต้นเกี่ยวกับการเขียนโปรแกรม ASP (21): การสร้างตารางฐานข้อมูลของ DAO SQL

-

ตัวเลือกอย่างชัดเจน

Dim Databasename 'กำหนดชื่อฐานข้อมูล

databasename = "cnbruce.mdb" 'ชื่อฐานข้อมูล

Dim DatabasePath 'กำหนดพา ธ การจัดเก็บข้อมูลฐานข้อมูล

databasepath = "e:/cnbruce/database/" path สัมบูรณ์ของฐานข้อมูล

Dim Databasever 'กำหนดฐานข้อมูลเวอร์ชัน 2000 หรือ 97

Databasever = "2000"

ฟังก์ชั่น CreateDfile (FilePath, Filename, ver)

Dim Cnbruce, dbver

เลือก Case ver

กรณี "97"

dbver = "3.51"

กรณี "2000"

dbver = "4.0"

สิ้นสุดเลือก

ถ้า dbver <> "" แล้ว

ตั้งค่า cnbruce = server.createObject ("adox.catalog")

โทร cnbruce.create ("ผู้ให้บริการ = microsoft.jet.oledb." & dbver & "; แหล่งข้อมูล =" & filepath & filename)

สิ้นสุดถ้า

ฟังก์ชันสิ้นสุด

Call CreateDFile (DatabasePath, DatabasEname, Databasever) 'สร้างฐานข้อมูล

-

-

db_path = "cnbruce.mdb"

ตั้งค่า conn = server.createObject ("adodb.connection"))

connstr = "ผู้ให้บริการ = microsoft.jet.oledb.4.0; แหล่งข้อมูล =" & server.mappath (db_path)

conn.open connstr

-

<!-#รวม file = "conn.asp"->

-

ตั้งค่า rs = server.createObject ("adodb.recordset"))

SQL = "สร้างตารางเกี่ยวกับ ME (รหัสหลัก ID จำนวนเต็ม, ข้อความชื่อ, วันเกิดวันเกิด)"

Rs.Open SQL, Conn, 2,3

-

ไฟล์ตารางฐานข้อมูลถูกสร้างขึ้น