21/07/2004, 13:04
|
 | | | Fecha de Ingreso: junio-2004 Ubicación: Misantla,Ver.Mexico
Mensajes: 181
Antigüedad: 19 años, 11 meses Puntos: 0 | |
| Conexion pero con Mysql
Saludos,
Mira yo tengo conexiones con MySQL, te envio un ejemplo
a ver si te sirve
'*****Creo los objetos
Dim MyOconn As New Data.Odbc.OdbcConnection
Dim MyComm As New Data.Odbc.OdbcCommand
Dim Myread As Data.Odbc.OdbcDataReader
'*****defino la conexion MyOconn.ConnectionString "STMT=;OPTION=3;DSN=MySQL_ODBC_Interview;UID=ortiz agu;PASSWORD=shark;DESC=MySQL ODBC 3.51 Driver DSN;DATABASE=DBinterview;SERVER=localhost;PORT=330 6"
MyComm.Connection = MyOconn
MyComm.CommandText = "SELECT city FROM inter_city"
Try
MyOconn.Open()
'*ejecuto query con salida
Myread = MyComm.ExecuteReader()
'****recorro el reader
Do While Myread.Read
Response.Write("<br>" & Myread.GetValue(0))
Loop
Catch ex As Exception
Finally
'**cierro objetos/destruyo
MyOconn.Close()
MyComm.Dispose()
Myread.Close()
End Try |