Хостинг на базе Windows (Plesk) Справка

Буп, бип, боп...вычисление... вычисление...запуск последовательности 42...
Да, похоже эти сумасшедшие роботы опять взялись за свое! Они перевели эту страницу на ваш язык. Роботы действовали из лучших побуждений своих металлических сердец. Они хотели помочь вам! Давайте посмотрим, как они справились со своей задачей, используя кнопки в нижней части страницы. Перейти к английской версии

Подключение к базе данных MySQL с помощью ASP / ADO

В этом примере описывается использование ASP / ADO для подключения к базе данных MySQL.

Замените значения, начинающиеся с your_, информацией из вашей базы данных. Замените mysql.secureserver.net именем хоста базы данных из 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

%>

Помогла ли вам эта статья?
Благодарим вас за отзыв. Чтобы связаться с сотрудником службы поддержки клиентов, позвоните по номеру этой службы или воспользуйтесь опцией чата выше.
Мы рады вам помочь! У вас остались вопросы?
Приносим извинения. Расскажите нам, какие затруднения вы испытываете или почему рекомендованное решение не помогло устранить проблему.