Довідка

Хостинг під керуванням Windows (Plesk) Довідка

Біп... джжж... біп... обчислюємо... вираховуємо... нове речення...
Здається, божевільні роботи знову взялися до свого! Вони заходилися працювати та переклали цю сторінку на вашу мову. Ці роботи мають найкращі наміри та вкладають у переклад свою металеву душу. Вони бажають допомогти вам! За допомогою кнопок внизу сторінки повідомте нам, наскільки добре попрацювали роботи. Перейти до англійської версії

Підключення до бази даних 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

%>

Чи була ця стаття корисною?
Дякуємо за ваш відгук. Щоб звернутися до представника служби підтримки, скористайтеся телефонним номером або чатом (див. вище).
Ми раді, що змогли допомогти! Що ще ми можемо для вас зробити?
Нам дуже прикро. Повідомте нам, що викликало замішання або чому рішення не усунуло вашу проблему.