Retroceder   Foros del Web > Programación para sitios web > .NET > win forms

Respuesta
 
Herramientas Desplegado
Antiguo 19-abr-2008, 17:54   #1 (permalink)
Danielfuzz ha deshabilitado el karma
 
Fecha de Ingreso: septiembre-2007
Mensajes: 7
Pregunta cómo subir archivos a un servidor con vb.net (No ASP)

hola, tengo un problema, no se cómo subir archivos a un servidor con visual basic .net 2005.

Mi idea es que tengo un programilla para registrar usuarios en un club de video, el usuario carga su foto al programa, pero no se como subir del programa al servidor.

Por favor alguiena yudeme con esto. Mil gracias de antemano.

Daniel.
Danielfuzz está desconectado   Responder Citando
Antiguo 19-abr-2008, 18:21   #2 (permalink)
junahu ha deshabilitado el karma
 
Fecha de Ingreso: abril-2006
Mensajes: 7
Re: cómo subir archivos a un servidor con vb.net (No ASP)

yo hice algo parecido y lo hice con SaveFileDialog:

/////////////////////////////////////////////////////////////////////////////////
Dim fi As New IO.FileInfo(<ruta del archivo a mandar al servidor>)

SaveFileDialog1.InitialDirectory = <ruta de la carpeta compartida del servidpr>

SaveFileDialog1.Filter = "Documento Word (*.doc)|*.doc|Documento Adobe (*.pdf)|*.pdf" ''yo mandaba un archivo de texto.

SaveFileDialog1.FilterIndex = 1

SaveFileDialog1.RestoreDirectory = True

SaveFileDialog1.FileName = fi.Name '' nombre del documento

If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim ruta As String = Me.SaveFileDialog1.FileName
fi.CopyTo(ruta, True)
Me.Close()
End If
///////////////////////////////////////////////////////////////////////////////////////

esto lo utilicé en un programa que corría con XP y funcionaba, pero el mismo programa con el vista, esto no funcionaba y tuve que utilizar una conexión a unidad de red.

espero que te sirva y saludos.
junahu está desconectado   Responder Citando
Antiguo 19-abr-2008, 18:52   #3 (permalink)
Danielfuzz ha deshabilitado el karma
 
Fecha de Ingreso: septiembre-2007
Mensajes: 7
Re: cómo subir archivos a un servidor con vb.net (No ASP)

Cita:
Iniciado por junahu Ver Mensaje
yo hice algo parecido y lo hice con SaveFileDialog:

/////////////////////////////////////////////////////////////////////////////////
Dim fi As New IO.FileInfo(<ruta del archivo a mandar al servidor>)

SaveFileDialog1.InitialDirectory = <ruta de la carpeta compartida del servidpr>

SaveFileDialog1.Filter = "Documento Word (*.doc)|*.doc|Documento Adobe (*.pdf)|*.pdf" ''yo mandaba un archivo de texto.

SaveFileDialog1.FilterIndex = 1

SaveFileDialog1.RestoreDirectory = True

SaveFileDialog1.FileName = fi.Name '' nombre del documento

If SaveFileDialog1.ShowDialog() = Windows.Forms.DialogResult.OK Then
Dim ruta As String = Me.SaveFileDialog1.FileName
fi.CopyTo(ruta, True)
Me.Close()
End If
///////////////////////////////////////////////////////////////////////////////////////

esto lo utilicé en un programa que corría con XP y funcionaba, pero el mismo programa con el vista, esto no funcionaba y tuve que utilizar una conexión a unidad de red.

espero que te sirva y saludos.
hola, primeramente grcias por tu respuesta.
Tu ejemplo sirve para guardar los archivos en la Pc local, lo que yo busco es guardarlos en un servidor remoto con Nombre de Usuario y contraseña.

Encontré un método que es My.Computer.Network.Uploadfile(sourceFileName, address, userName, password), pero tengo problemas con el segundo parametro.
En todos los ejemplos que vi acerca de este método el segundo parametro especifica la direccion de un archivo y no así de una carpeta o directorio. a continuiacion un ejemplo:

Cita:
Este ejemplo carga el archivo Order.txt en http://www.cohowinery.com/uploads sin proporcionar ningún nombre de usuario ni contraseña, muestra el progreso de la carga y tiene un tiempo de espera de 500 milisegundos.
Código:
My.Computer.Network.UploadFile ("C:\My Documents\Order.txt", "http://www.cohowinery.com/upload.aspx","","",True,500)
Como ven en el segundo parametro se especifica un archivo y no un directorio. Tambien llegué a pensar que se trataba del nombre con que se guardaría el archivo pero tampoco porq me salió un mensaje en la excepción: "Error 404 No encontrado" o algo asi.

Por favor alguien expliqueme como trabaja este metodo!!!

Última edición por Danielfuzz; 20-abr-2008 a las 18:08.
Danielfuzz está desconectado   Responder Citando
Antiguo 20-abr-2008, 19:29   #4 (permalink)
Danielfuzz ha deshabilitado el karma
 
Fecha de Ingreso: septiembre-2007
Mensajes: 7
Re: cómo subir archivos a un servidor con vb.net (No ASP)

acabo de probar el UploadFile guardando el archivo en un servidor ftp y no en un servidor web como lo intente antes y funcionó. voy a cerrar el tema, aunque me gustaría saber como hacerlo en un servidor web. Acá les dejo un resumen de como lo hice antes y después (para aquellos futuros visitantes que tengan el mismo problema):

antes lo hice así (no me funcionó):
Código:
My.Computer.Network.UploadFile("C:\Documents and Settings\daniel\Escritorio\ip.txt", "http://localhost/ip.txt", "Usuario", "mipassword", True, 500)
después instalé un servidor ftp, me cree un usuario y me di permisos de escritura. y cambié el código anterior por este:
Código:
My.Computer.Network.UploadFile("C:\Documents and Settings\daniel\Escritorio\ip.txt", "ftp://localhost/ip.txt", "Usuario", "mipassword", True, 500)
(Ojo que el usuario y password de este ultimo ejemplo te lo das al crear tu usuraio en el servidor ftp).

saludos!!!

Última edición por Danielfuzz; 20-abr-2008 a las 19:30. Razón: error typeo
Danielfuzz está desconectado   Responder Citando
Respuesta
Calificación: Calificación de Tema: 1 votos, 5,00 de promedio.


Herramientas
Desplegado

Normas de Publicación
No puedes crear nuevos temas
No puedes responder temas
No puedes subir archivos adjuntos
No puedes editar tus mensajes

BB code is Activado
Caritas están Activado
[IMG] está Activado
Código HTML está Desactivado


La Zona horaria es GMT -6. Ahora son las 01:06.


Message Board Statistics

LinkBacks Enabled by vBSEO 3.1.0

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93