conexion a internet
Publicado por ruben francisco mucio gutierrez (25 intervenciones) el 04/03/2015 18:21:03
1
2
3
4
5
6
7
8
9
oCon:=toleauto():new("adodb.connection")
Try
//* 192.168.0.95
oCon:OPEN("DRIVER={MySQL ODBC 3.51 DRIVER};SERVER=192.168.0.95;DATABASE=tonco;UID=root") //*;PWD=root")
Catch oErr
Return Nil
END TRY
oSql:=toleauto():new("adodb.command")
oSql:ActiveConnection(oCon)
CON EL ANTERIOR CODIGO ME CONECTO A LA BASE DE DATOS DE MYSQL EN UNA RED LOCAL EN LA CUAL HE CONECTADO HASTA 2O EQUIPOS Y NO TENGO PROBLEMA. Y AHORA QUE CONTAMOS CON UNA IP FIJA O PUBLICA NECESITO SABER QUE CAMBIOS HACERLE AL CODIGO ANTERIOR PARA PODER CONECTAR LA BASE DE DATOS POR INTERNET. TODO EL CODIGO RESTANTE PARA LA ADMINISTRACION DE LAS TABLAS DE LA BASE DE DATOS ESTA ESCRITO EN XHARBOUR. EL SERVIDOR QUE CONTIENE LA BASE DE DATOS CUENTA CON WINDOWS XP DE 32 BITS.
AGRADECERE SU AYUDA.
Valora esta pregunta
0
