Autor
Bueno mi problema es que estoy haciendo un inicio de sección + registro de usuario ,
La cual estoy trabajando primeramente estoy empesando por el registro el registro tiene la funcion de cuando ingresamos un usuario y contraseña pues se envian los datos y se crean 2 archivos .txt la cual el primero obtendra el nombre que ingreso y dentro de el tabien tendra el nombre (esto es para diferenciar los datos de los usuarios) y el sugundo obtendra el nombre + "_Contraseña" para asi difenciar las contraseñas de los usuarios . Tabien estoy pensando en crear lo que es una capeta para cada usuario
y que ay contanga los datos del usuario Bien el code del registro es este!
Citar
If TextBox1.Text = "" Then
If TextBox2.Text = "" Then
MsgBox("Su usuario y contraseña deve tener almenos mas de 6 caracteres!", MsgBoxStyle.Information, "Error")
End If
Else
Try
Dim client As New Net.WebClient
Dim user As New Integer
client.Credentials = New Net.NetworkCredential("usuario", "pw")
client.UploadString("http://ftp://yourhost/" + TextBox1.Text + "/" + TextBox1.Text + ".txt", vbNewLine)
client.UploadString("http://ftp://yourhost/" + TextBox1.Text + "/" + TextBox2.Text + ".txt", vbNewLine)
MsgBox("Cuenta Creada Corectamente!" & vbCrLf)
Me.Hide()
Login.Show()
Catch ex As Exception
MsgBox("Error de conexión")
End Try
If TextBox2.Text = "" Then
MsgBox("Su usuario y contraseña deve tener almenos mas de 6 caracteres!", MsgBoxStyle.Information, "Error")
End If
Else
Try
Dim client As New Net.WebClient
Dim user As New Integer
client.Credentials = New Net.NetworkCredential("usuario", "pw")
client.UploadString("http://ftp://yourhost/" + TextBox1.Text + "/" + TextBox1.Text + ".txt", vbNewLine)
client.UploadString("http://ftp://yourhost/" + TextBox1.Text + "/" + TextBox2.Text + ".txt", vbNewLine)
MsgBox("Cuenta Creada Corectamente!" & vbCrLf)
Me.Hide()
Login.Show()
Catch ex As Exception
MsgBox("Error de conexión")
End Try
Aun no le he probado pero espero que me ayuden tabn necesito saber si me pueden completar el code que iria en el Login , siguiendo apartir de estos podrian pues ayudarme
En línea
tiene MUCHA info util
