elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Curso de javascript por TickTack


+  Foro de elhacker.net
|-+  Programación
| |-+  Programación General
| | |-+  .NET (C#, VB.NET, ASP) (Moderador: kub0x)
| | | |-+  Mostrar texto en textbox desde archivo en servidor		0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] 2 Ir Abajo Respuesta Imprimir
Autor Tema: Mostrar texto en textbox desde archivo en servidor  (Leído 6,885 veces)
rapbyone

Desconectado Desconectado

Mensajes: 173


Ver Perfil
Mostrar texto en textbox desde archivo en servidor
« en: 18 Octubre 2013, 21:19 pm »
Mi consulta es la siguiente, tengo un código que me muestra en un textbox el contenido de un archivo.txt que esta en mi pc, mi pregunta es.

Como podría hacer lo mismo con un archivo de texto que esta en un servidor ?

El codigo es este:

Código:
Private Sub Form_load()
    Dim linea As String
    Dim c As String
   
 ' Muestra en textbox el contenido de archivo local version.txt
 
    Open "c:/version.txt" For Input As #1
    linea = ""
    Me.Text4.Text = ""
    While Not EOF(1)
        c = Input(1, #1)
        If c = "," Then
            Me.Text4.Text = Me.Text4.Text + linea + vbNewLine
            linea = ""
        Else
            linea = linea + c
        End If
    Wend
    If linea <> "" Then Me.Text4.Text = Me.Text4.Text + linea
    Close #1
   
  ' Muestra en textbox el contenido de  archivo version.txt desde servidor
   
    Open "http://miweb/updatepatch/version.txt" For Input As #1
    linea = ""
    Me.Text3.Text = ""
    While Not EOF(1)
        c = Input(1, #1)
        If c = "," Then
            Me.Text3.Text = Me.Text3.Text + linea + vbNewLine
            linea = ""
        Else
            linea = linea + c
        End If
    Wend
    If linea <> "" Then Me.Text3.Text = Me.Text3.Text + linea
    Close #1   

End Sub

Así se ve en mi programa:



Muchas, pero muchas gracias por la paciencia :D

Enviado desde mi GT-I9300 usando Tapatalk
En línea
Danyfirex


Desconectado Desconectado

Mensajes: 493


My Dear Mizuho


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #1 en: 19 Octubre 2013, 03:56 am »
Podrías hacer algo como esto

Código
  1. Private Sub Form_Load()
  2. Dim Msxml2 As Object
  3. Set Msxml2 = CreateObject("Msxml2.XMLHTTP.3.0")
  4. Msxml2.open "GET", "http://www.autoitscript.com/autoit3/docs/autoit_changelog_complete.txt", False
  5. Msxml2.send
  6. Text1.Text = Msxml2.responseText
  7. End Sub
  8.  

Saludos
En línea
rapbyone

Desconectado Desconectado

Mensajes: 173


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #2 en: 19 Octubre 2013, 16:33 pm »
Cita de: Danyfirex en 19 Octubre 2013, 03:56 am
Podrías hacer algo como esto

Código
  1. Private Sub Form_Load()
  2. Dim Msxml2 As Object
  3. Set Msxml2 = CreateObject("Msxml2.XMLHTTP.3.0")
  4. Msxml2.open "GET", "http://www.autoitscript.com/autoit3/docs/autoit_changelog_complete.txt", False
  5. Msxml2.send
  6. Text1.Text = Msxml2.responseText
  7. End Sub
  8.  

Saludos

Me funciono perfecto, el problema es que al cambiar el contenido del archivo en el servidor, no cambia en el textbox, sigue mostrando el anterior :S

Es como si descargara el archivo y después tomara los datos de ahí y no del servidor.

Muchas gracias :D ;-)
« Última modificación: 19 Octubre 2013, 16:38 pm por rapbyone » En línea
Danyfirex


Desconectado Desconectado

Mensajes: 493


My Dear Mizuho


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #3 en: 19 Octubre 2013, 18:44 pm »
Debería funciona al llamar la función otra vez.
En línea
rapbyone

Desconectado Desconectado

Mensajes: 173


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #4 en: 20 Octubre 2013, 00:18 am »
Tienes toda la razon  ;-) :xD

muchas gracias tema resuelto :D
« Última modificación: 20 Octubre 2013, 00:26 am por rapbyone » En línea
juandiegov

Desconectado Desconectado

Mensajes: 9


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #5 en: 23 Octubre 2013, 17:47 pm »
Cita de: Danyfirex en 19 Octubre 2013, 03:56 am
Podrías hacer algo como esto

Código
  1. Private Sub Form_Load()
  2. Dim Msxml2 As Object
  3. Set Msxml2 = CreateObject("Msxml2.XMLHTTP.3.0")
  4. Msxml2.open "GET", "http://www.autoitscript.com/autoit3/docs/autoit_changelog_complete.txt", False
  5. Msxml2.send
  6. Text1.Text = Msxml2.responseText
  7. End Sub
  8.  

Saludos

No me sirve :'(

asi lo tengo

Código
  1. Private Sub Form_Load()
  2.         Dim Msxml2 As Object
  3.         Msxml2 = CreateObject("Msxml2.XMLHTTP.3.0")
  4.         Msxml2.open("GET", "http://localhost/versionf.txt", False)
  5.         Msxml2.send()
  6.         Text1.Text = Msxml2.responseText

Tambien tengo el textbox
llamado text1



q tengo mal?

uso vb 2008
En línea
Danyfirex


Desconectado Desconectado

Mensajes: 493


My Dear Mizuho


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #6 en: 23 Octubre 2013, 18:12 pm »
Que error te da?

tal vez así:

Código
  1.  
  2. Dim webClient As New System.Net.WebClient
  3. Dim result As String = webClient.DownloadString("http://localhost/versionf.txt")
  4.  Text1.Text=result
  5.  


Saludos
En línea
juandiegov

Desconectado Desconectado

Mensajes: 9


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #7 en: 23 Octubre 2013, 18:29 pm »
Cita de: Danyfirex en 23 Octubre 2013, 18:12 pm
Que error te da?

tal vez así:

Código
  1.  
  2. Dim webClient As New System.Net.WebClient
  3. Dim result As String = webClient.DownloadString("http://localhost/versionf.txt")
  4.  Text1.Text=result
  5.  


Saludos
gracias por responder tan rapido
no no me da error
pero no se muestra nada en el textbox
En línea
Danyfirex


Desconectado Desconectado

Mensajes: 493


My Dear Mizuho


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #8 en: 23 Octubre 2013, 21:04 pm »
Coloca el textbox en multilinea.

Saludos
En línea
rapbyone

Desconectado Desconectado

Mensajes: 173


Ver Perfil
Re: Mostrar texto en textbox desde archivo en servidor
« Respuesta #9 en: 24 Octubre 2013, 00:58 am »
Yo tampoco pude, asi que envés de textbox use un control webbrowser, si te interesa, te doy el código amigo
En línea
Páginas: [1] 2 Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
AYUDA CON ARCHIVO DE TEXTO Y TEXTBOX
Programación Visual Basic 		Xephiro 3 2,160 Último mensaje 29 Abril 2006, 05:21 am
por Xephiro
¿Sacar el texto de un archivo y meterlo en un TextBox?
Programación Visual Basic 		DProduct 2 1,724 Último mensaje 10 Febrero 2008, 01:28 am
por cassiani
[BATCH]Mostrar Suma de las lineas de un archivo de texto. « 1 2 »
Scripting 		FranciskoAsdf 10 11,296 Último mensaje 1 Julio 2011, 09:27 am
por WaAYa HaCK
Archivo de texto desde HTML
Desarrollo Web 		Flamer 2 2,486 Último mensaje 11 Octubre 2013, 21:08 pm
por Flamer
Pasar informacion de un textbox a un archivo de texto.
.NET (C#, VB.NET, ASP) 		sadfud 1 2,681 Último mensaje 20 Febrero 2015, 18:38 pm
por Eleкtro
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines