Mensajes

Soy nuevo en esto de vb.net
Que tipo de servidor necesito??
Yo tengo una cuenta de zobyhost con ftp. No se si es valida, pero es gratuita.
El archivo que tienes que subir tiene que ser el instlador??

Un saludo: eduardogi

Gracias por tu respuesta. Creo que ya lo tengo.

Código [Seleccionar] Expandir

Dim rutaFichero As String
        rutaFichero = Form1.ruta_txt.Text
        With FolderBrowserDialog1
            .Description = "Seleccionar la carpeta"
            If .ShowDialog = Windows.Forms.DialogResult.OK Then
                ruta_txt.Text = (.SelectedPath)
            End If
            MsgBox("Listado.txt va ser creado en la siguiente ruta" & Chr(10) & (.SelectedPath))
        End With


        If Not My.Computer.FileSystem.FileExists(FolderBrowserDialog1.SelectedPath & "\listado.txt") Then
            Dim Archivo As System.IO.FileStream
            Archivo = System.IO.File.Create(FolderBrowserDialog1.SelectedPath & "\listado.txt")
            Archivo.Close()
        End If


        Dim a As Integer
        Dim Linea As String
        Dim _Stream As New IO.FileStream(FolderBrowserDialog1.SelectedPath & "\listado.txt", IO.FileMode.Open)
        Dim _StreamWriter As New IO.StreamWriter(_Stream)
        _StreamWriter.WriteLine("Programa desarollado por Eduardo Giralda" & vbNewLine & "Ruta: " & ruta_txt.Text & vbNewLine & "Numero de archivos: " & n_lbl.Text & vbNewLine & "")
        For a = 0 To ListBox1.Items.Count - 1
            Linea = ListBox1.Items(a).ToString()
            _StreamWriter.WriteLine(Linea)

        Next
        _StreamWriter.Close()
        MsgBox("Archivo creado correctamente")

Un saludo: eduardogi

Es que he tenido un montón de problemas. Si sacaba del for el close me decía que no estaba declarado, y si lo ponía de otras formas me daba error porque decía que el archivo estaba abierto.
Puede acarrear algún error o solo que es mas lento el programa??

Un saludo: eduardogi

Gracias nuevamente por tu respuesta. jaja por fin consigo que me funcione.
Ahora un problema que no consigo solucionar, es borrar el fichero antes de escribir en el.
Os dejo en codigo:

Dim rutaFichero As String
        rutaFichero = Form1.ruta_txt.Text
        With FolderBrowserDialog1
            .Description = "Seleccionar la carpeta"
            If .ShowDialog = Windows.Forms.DialogResult.OK Then
                ruta_txt.Text = (.SelectedPath)
            End If
            MsgBox("Listado.txt va ser creado en la siguiente ruta" & Chr(10) & (.SelectedPath))
        End With


        If Not My.Computer.FileSystem.FileExists(FolderBrowserDialog1.SelectedPath & "\listado.txt") Then
            Dim Archivo As System.IO.FileStream
            Archivo = System.IO.File.Create(FolderBrowserDialog1.SelectedPath & "\listado.txt")
            Archivo.Close()
        End If


        Dim a As Integer
        Dim Linea As String
        For a = 0 To ListBox1.Items.Count - 1
            Dim _Stream As New IO.FileStream(FolderBrowserDialog1.SelectedPath & "\listado.txt", IO.FileMode.Open)
            Dim _StreamWriter As New IO.StreamWriter(_Stream)

            Linea = Linea & vbNewLine & ListBox1.Items(a).ToString()
            _StreamWriter.Write("")
            _StreamWriter.WriteLine(Linea)
            _StreamWriter.Close()
        Next
        Dim _Stream2 As New IO.FileStream(FolderBrowserDialog1.SelectedPath & "\listado.txt", IO.FileMode.Open)
        Dim _StreamWriter2 As New IO.StreamWriter(_Stream2)
        _StreamWriter2.WriteLine("Programa desarollado por Eduardo Giralda" & vbNewLine & "Ruta: " & ruta_txt.Text & vbNewLine & "Numero de archivos: " & n_lbl.Text & vbNewLine & "" & vbNewLine & Linea)
        _StreamWriter2.Close()
        MsgBox("Archivo creado correctamente")

Un saludo: eduardogi

Lo primero gracias por tu respuesta.

El error es este:
Excepción del tipo 'System.UnauthorizedAccessException' en mscorlib.dll
En esta linea:
Dim oSW As New StreamWriter(FolderBrowserDialog1.SelectedPath)

Y como tu dices se me ha colado la pata y es con el -1.

Estoy empezando en VB.NET y el otro día me surgió la idea de desarrollar una aplicacion para listar los archivos de una carpeta. Me puse a ello, pero me han surgido 2 problemas que serán una tontería, pero que no consigo solucionar.

*El primero: Primero selecciona la ruta de la carpeta y me lista todo los archivos en listbox. Ahora querría guardar esta lista en un archivo de texto.
Este es el código que llevo pero me da error.


Dim rutaFichero As String
        rutaFichero = Form1.ruta_txt.Text
        With FolderBrowserDialog1
            .Description = "Seleccionar la carpeta"
            If .ShowDialog = Windows.Forms.DialogResult.OK Then
                ruta_txt.Text = (.SelectedPath)
                MsgBox("Se va a crear un fichero de texto en la siguiente ruta " & Chr(10) & (.SelectedPath))
            End If
        End With
        Try
            Dim oSW As New StreamWriter(FolderBrowserDialog1.SelectedPath)
            Dim a As Integer
            For a = 0 To ListBox1.Items.Count - a
                Dim Linea = ListBox1.Items(a).ToString()
                oSW.WriteLine(Linea)
                oSW.Flush()
            Next
                catch
            MsgBox("No se ha podido crear el fichero por falta de permisos" & Chr(10) & " Intente ejecutar la aplicacion con derechos de administrador", MsgBoxStyle.Critical)


        End Try

*El segundo es que pongo otra opción para copiar toda la lista al porta-papeles. Creo que lo mas fácil es primero llevarlo a un textbox y luego copiar el contenido, pero no se si es la mejor opcion:

Form3.copia_txt.Text = ""
        For i = 0 To ListBox1.SelectedItems.Count - 1
            Form3.copia_txt.Text = Form3.copia_txt.Text & Chr(10) & ListBox1.Items(i).ToString()
        Next
        Form3.Show()

Muchas gracias de antemano.
Un saludo: eduardogi

ok, ¿Hay alguna solucion?
Visual web developed no puedo utilizarlo ya que mi servidor no admite .asp
Respecto a dreamweaver, no se utilizarlo y necesito tener lista la pagina en 2 semanas.
Alguna alternativa??

Gracias por vuestras respuestas
Un saludo: eduardogi

Miren estoy haciendo una pagina con frontpage 2003.
Intento hacer un vinculo a un archivo .rar o .exe.
El problema es que al pinchar en el vinculo me abre un pagina de publicidad.
El link está bien echo porque en la barra aparece bien la direccion del archivo, pero derrepente me redirecciona atra pagina de publicidad.

He intentado el mismo vinculo con .exe y .rar pero ocurre lo mismo. Intentandolo con .docx si funciona y me sale el dialogo para abrir o guardar.

Mi servidor es gratuito y es zobyhost.

Espero vuestras respuestas y os doy las gracias de antemano.
Un saludo: eduardogi

Quiero que me busque en las distintas páginas que se puedan descargar.
ejm:
http://www.mundonds.es/
http://www.mundiroms.com/
y algunas más.

Una vez aya buscado en estas paginas te las ordene y te coloque enlace para abrirla con el navegador predeterminado y desde ahí descargarlas por descarga directa.

De todas maneras veo este proyecto demasiado complicado.
Por lo que en un futuro con mas experiencia lo intentaré de nuevo.

Gracias por vuestras respuestas
Un saludo: eduardogi

Miren intento crear un programa en vb.net.
Deseo que este te busque juegos de la nds en las diferentes paginas.
Luego te haga un listado de ellas y que al pinchar se te habrá en el navegador.

Un saludo: eduardogi