Conectar VB con bd en internet

[Flashera]

Hola a todos.
Tengo una base de datos en access en un servidor de hosting que contiene datos sobre el número de visitas que genera el sitio por día.
Me gustaría poder ver ese dato desde mi propia PC haciendo un programita en VB que se conecte a esa base de datos y me muestre el dato de las visitas en un textbox.
Se puede hacer?
Espero su ayuda.

[Programmer]

Eso puedes hacerlo de varias formas, la mas facil es que en php o asp te crees un script que te devuelva solo el resultado, sin HTML, luego en VB usas el control Browser y la URL a abrir es la del script mensionado... tambien puedes pasarle argumentos como contraseña y usuario, o algunos otros que sean oportunos... Luego, obtienes el texto del documento solicitado al servidor y ese seria los datos estadisticos (o lo que hayas programado que el script te devuelva)...

Otra es similar, pero mas compleja, ya que entonces tu programa lo diseñarias como una especie de navegador, para lo cual debes conocer los encabezados que en este tipo de protocolo se utiliza, luego, suponiendo que para ello usas el control Winsock, este control recibira los datos directamente, con lo cual ya estaran listo para ser procesados por tu programa en VB...

Y otra, pero mas complicado y con mas necesidades (pero no impoible) es que tu mismo te crees tu dos programitas (cliente y servidor) para que alli ellos se comuniquen y solo se transfieran los datos necesarios, pero de una forma mas personalizada... aqui el problema es que debes tener acceso al servidor y debes poder ejecuar aplicaciones alli, o en su caso como CGI, que para eso, es mejor usar PHP como CGI y no programarse uno desde cero...

Ahi estan tres formas de lograrlo, la implementacion depende de tus recuersos y necesidades, en lo personal veo mas viable la primera...

Hasta pronto, y espero no haber confundido...

[RollBack]

Hola,

Tambien puedes hacerlo con Script PHP o ASP (como dice el amigo) pero esta vez, leerias los datos en XML, tu al script en el server haces que devuelva los datos en XML y en VB los lees, mira, yo lo hago asi y funciona perfectamente:

Sub Carga_Datos_Personales()
Dim NodeValue
Dim A, x As Integer
Dim carga As Boolean
Dim Registro_X As String

On Error GoTo Err_Handle
XML.async = False
carga = XML.Load("http://www.tusitio.com/datos_personales.php?idp=" & dni)

While XML.readyState <> 4
Barra.Panels(1).Text = "Cargando Información Personal...."
DoEvents
Wend

For A = 1 To XML.documentElement.childNodes.Length
Registro_X = "datos/registro_" & Trim(Str(A))
Set objNodes = XML.selectNodes(Registro_X)
For Each objBookNode In objNodes
T_nombre = objBookNode.childNodes(0).Attributes.getNamedItem( "target").NodeValue
T_edad = objBookNode.childNodes(1).Attributes.getNamedItem( "target").NodeValue
T_correo = objBookNode.childNodes(2).Attributes.getNamedItem( "target").NodeValue
T_pais = objBookNode.childNodes(3).Attributes.getNamedItem( "target").NodeValue
T_rango = objBookNode.childNodes(4).Attributes.getNamedItem( "target").NodeValue
T_vatsim = objBookNode.childNodes(5).Attributes.getNamedItem( "target").NodeValue
T_ivao = objBookNode.childNodes(6).Attributes.getNamedItem( "target").NodeValue
T_fp = objBookNode.childNodes(7).Attributes.getNamedItem( "target").NodeValue
T_estado = objBookNode.childNodes(8).Attributes.getNamedItem( "target").NodeValue
T_horas = CDbl(objBookNode.childNodes(9).Attributes.getNamed Item("target").NodeValue)
T_fecha = objBookNode.childNodes(10).Attributes.getNamedItem ("target").NodeValue
PilotoEstado = objBookNode.childNodes(11).Attributes.getNamedItem ("target").NodeValue
Next objBookNode
Next A

Set objNodes = Nothing
Barra.Panels(1).Text = "Preparado"
Exit Sub
Err_Handle:
Set objNodes = Nothing
Barra.Panels(1).Text = "Error al bajar información personal...."
End Sub


Como ves, todos los datos personales quedan en las variables T_n , en este caso me devuelve un solo registro ok, pero si son mas, puedes hacer que se valla cargando un listview y listo.

Buno, espero haber ayudado, cualquier cosa me consultas.

[Flashera]

La opcion de RollBack esta más encaminada a mi idea, pero existe un grave problema..., no soy tan experimentada ni con VB ni con XML, es por eso que necesitaria un ejemplo para descargar para poder guiarme un poco más, ya que seguro el script que me mandaste debe tener eventos muy avanzados.
Espero tu respuesta ya que es eso lo que estaba buscando.
saludos: