Omitir y ver el contenido principal
Mantén tu negocio activo durante la crisis de la COVID-19Más información
Llámanos
Números telefónicos y horarios
Centro de Ayuda

Explora nuestros recursos de ayuda en línea

BlogAyuda

Hosting para Windows (Plesk) Ayuda

Hicimos lo mejor que pudimos para traducir esta página para ti. La página en inglés también está disponible.

Conexión a una base de datos MySQL usando ASP/ADO

Este ejemplo describe el uso de ASP/ADO para conectarse a una base de datos MySQL.

Reemplazar los valores que comiencen conyour_ con la información de tus bases de datos. Reemplazarmysql.secureserver.net con el nombre de host de la base de datos.

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

%>