conexion de bd mysql con asp

[Essftg]

hola me podriais indicar como se hacen las conexiones de mysql con asp????

[monkyta]

Si es LOCAL va asi :

Conn.Open "Driver={mySQL};" &_
"Server=TUSERVER;" & _
"Option=16834;" & _
"Database=TUBASE"

Si la conexion es REMOTA va asi :

Conn.Open "Driver={mySQL};" & _
"Server=TUSERVER;" & _
"Port=3306;" & _
"Option=131072;" & _
"Stmt=;" & _
"Database=TUBASE;" & _
"Uid=TULOGIN;" & _
"Pwd=TUPASSWORD"

[tomchat]

dim BD

SET BD=SERVER.CreateObject("ADODB.CONNECTION")

strConnection="driver={MySQL ODBC 3.51 Driver}; Server=localhost; Uid=root; Pwd=tuclave; Database=tubase; option=NUM"

BD.Open strConnection

' MySQL ODBC 3.51 Driver - - Indica el MYODBC

[CSR000]

Amigo estuve observando tu problema, se que soy nuevo aqui pero por que no pruebas esto:

1. Agregar todas las librerias Asi:
<%@ Import Namespace="System.data" %>
<%@ Import Namespace="System.Data.OleDb" %>

2. Luego en el lugar que desees activar la conexion escribe esto:
Dim Conn As New System.Data.Odbc.OdbcConnection
Conn.ConnectionString = "Driver={MySQL ODBC 3.51 Driver};uid=root;password=luzmaria;Server=localhos t;Option=16834;Database=correspondencia;"
Conn.Open()

3. A demas si quieres hacer una consulta como por ejemplo un Formulario de Inicio de Sesion haz esto:

Dim rs As New System.Data.Odbc.OdbcCommand
Dim sql As String

sql = "Select User_Name, User_Pass From usuarios"
sql &= " where User_Name= '" & Me.txtUser.Text & "'"
sql &= " and User_Pass = '" & Me.txtPass.Text & "'"
Dim Comando As New Odbc.OdbcCommand(sql, Conn)
Dim Usuarios As Odbc.OdbcDataReader = Comando.ExecuteReader
If Usuarios.Read = True Then
Response.Redirect("Home.aspx")
Else
Me.txtPass.Text = ""
Me.txtUser.Text = ""
End If
Conn.Close()

Espero te funcione