Trợ giúp

Dịch vụ lưu trữ Windows (Plesk) Trợ giúp

Búp bíp bóp… tính toán…tính toán … bắt đầu dãy 42…
Có vẻ như các robot điên cuồng này lại đang làm việc! Chúng đã giành quyền kiểm soát và dịch trang này ra tiếng địa phương của bạn. Các robot này thật sự chỉ có thiện ý trong trái tim kim loại của chúng. Chúng chỉ muốn giúp đỡ bạn! Hãy cho chúng tôi biết các robot làm việc như thế nào, với các nút ở phía dưới trang. Đi đến phiên bản Tiếng Anh

Kết nối với cơ sở dữ liệu MySQL bằng ASP / ADO

Ví dụ này mô tả việc sử dụng ASP / ADO để kết nối với Cơ sở dữ liệu MySQL.

Thay thế các giá trị bắt đầu bằng your_ bằng thông tin cơ sở dữ liệu của bạn. Thay thế mysql.secureserver.net bằng tên máy chủ cơ sở dữ liệu từ Hosting Control Panel.

<%
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

%>

Bài này có hữu ích không?
Cảm ơn về phản hồi của bạn. Để nói chuyện với một đại diện của dịch vụ khách hàng, vui lòng sử dụng số điện thoại hỗ trợ hoặc tùy chọn trò chuyện ở trên.
Rất vui vì chúng tôi đã giúp được bạn! Chúng tôi có thể làm gì thêm cho bạn?
Rất tiếc về điều đó. Vui lòng cho chúng tôi biết điều gì làm cho bạn bối rối và vì sao giải pháp không khắc phục được vấn đề này.