Conectar con una base de datos remota SQL

[{_The_Alwar_}]

Yo lo he copmprobado, el usuario esta creado, la contraseña es correcta y el host.. puede que este mal, pero si me dice acceso denegado sera porque conecta con els erver y me deniega el acceso, si tuviera mal me daria otro error que tambien me dia anteriormente

[soplo]

No no

Si el host está mal te dará exactamente ese error.

En tu caso en la tabla mysql.user debería estar el host como '%' en el registro de tu usuario.

En la tabla mysql.db debería estar el host como '%' en el registro de tu base de datos.

Comprueba también lo que tienes en mysql.tables_priv

Un saludo

[{_The_Alwar_}]

Un millon de gracias Soplo!!!!!! ya lo he conseguido!!!  tenia que agregar % en la lista de Host para que aceptara la conexion!

Pero como no! los errores en programacion nunca se acaban sobre todo con un inexperto como yo....

No entiendo si he declarado una variable por que me da el error:

Ahora os pongo el codigo... pero yo no veo error..

Código [Seleccionar] Expandir

Option Explicit
Dim Conexion As ADODB.Connection
Dim rsBase As ADODB.Recordset

Private Sub Form_Load()
Text1.Text = ""
Text2.Text = ""
Conexion.Open ("Provider=MSDASQL;Server=.;Data Source=Apogeus")
Set rsBase = Conexion.Execute("SELECT * FROM TU_TABLA")
Text1.Text = rsBase("Nick")
Text2.Text = rsBase("Mail")
End Sub

Saludos!