Estoy creando en mi web un inicio de sesion usando los controles createuserwizard y Login, pero cuando en la parte de registro quiero crear un usuario me aparece el error: error de inicio de sesion del usuario ".
El código VB que tengo es el siguiente:
Código:
Imports System.Data Imports System.Data.SqlClient Partial Class Registro Inherits System.Web.UI.Page Dim Usuario, Contraseña As String Public Function crear(ByVal username As String, ByVal password As String) As Boolean Dim Cadena As String = "Data Source=Ley-PC\LEYDA;Initial Catalog=usuarios;" Dim dbConnection As SqlConnection Dim Adaptador As SqlDataAdapter Dim dt As New DataTable Dim DataSet As New DataSet Dim SQL As String Dim res As Boolean Try SQL = "INSERT INTO usuarios VALUES='" & username & "''" & password & "'" dbConnection = New SqlConnection(Cadena) Adaptador = New SqlDataAdapter(SQL, dbConnection) DataSet.Clear() Adaptador.Fill(DataSet, "usuarios") Catch ex As Exception MsgBox("ERROR: " & ex.Message) End Try Return res End Function Protected Sub CreateUserWizard1_CreatingUser(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.LoginCancelEventArgs) Handles CreateUserWizard1.CreatingUser Dim resultado As Boolean Usuario = CreateUserWizard1.UserName.ToString Contraseña = CreateUserWizard1.Password.ToString resultado = crear(Usuario, Contraseña) If resultado = True Then MsgBox("Usuario Registrado", MsgBoxStyle.OkOnly, "Información") End If End Sub End Class