Lewati ke konten utama
Hubungi kami
Nomor dan waktu telepon
Pusat Bantuan

Jelajahi sumber daya bantuan online kami

Bantuan

Hosting Windows (Plesk) Bantuan

Kami berusaha sebaik mungkin menerjemahkan halaman ini untuk Anda. Halaman juga tersedia dalam bahasa Inggris.

Menghubungkan ke Database MySQL Menggunakan ASP / ADO

Contoh ini menjelaskan penggunaan ASP / ADO untuk menyambung ke Database MySQL.

Ganti nilai yang diawali denganyour_ dengan informasi database Anda. Gantimysql.secureserver.net dengan nama host basis data.

<%
Dim oConn, oRs
Dim qry, connectstr
Dim db_name, db_username, db_userpassword
Dim db_server

db_server = "mysql.secureserver.net"
db_name = "your_dbusername"
db_username = "your_dbusername"
db_userpassword = "your_dbpassword"
fieldname = "your_field"
tablename = "your_table"

connectstr = "Driver={MySQL ODBC 3.51 Driver};SERVER=" & db_server & ";DATABASE=" & db_name & ";UID=" & db_username & ";PWD=" & db_userpassword

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open connectstr

qry = "SELECT * FROM " & tablename

Set oRS = oConn.Execute(qry)

if not oRS.EOF then
while not oRS.EOF
response.write ucase(fieldname) & ": " & oRs.Fields(fieldname) & "
"
oRS.movenext
wend
oRS.close
end if

Set oRs = nothing
Set oConn = nothing

%>