 |
|
|
|
|
|
Portada | Monotemáticos | Secciones | Desarrolladores | Comunidad | Servicios | Servicios profesionales | RSS | |
||
|
||||
|
|
|||
 |
|
 |
||
|
||||
Directorio
|
Manuales
|
Scripts
|
FAQs
|
Programas
|
Artículos Copyleft
|
Actualidad
|
La Cosecha
|
Colabora
Alojamiento
|
Dominios.es
|
Micropagos SMS
|
Buscadores
|
Patentes, marcas
|
Creación web
|
Multimedia
|
Videos
Programación de los eventos(scripts)
Pasamos a programar los dos botones, el de aceptar y el de cancelar con sus eventos click.
10/4/07 -
1. Antes debemos importar el ensamblado que maneja la base de datos SQL Server
2. Luego para el botón Cancelar
Evento: Clic
Protected Sub btnCancelar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnCancelar.Click
Response.Redirect("indice.aspx")
End Sub
3. Para el botón Aceptar
Evento: Click
Protected Sub btnAceptar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnAceptar.Click
Dim sqlConexion As SqlConnection = New _
SqlConnection(ConfigurationManager.ConnectionStrings( _ "Ventas").ConnectionString)
Dim sqlComando As SqlCommand = New SqlCommand()
sqlComando.Connection = sqlConexion
sqlComando.CommandType = Data.CommandType.StoredProcedure
sqlComando.CommandText = "sp_Usuario_Clave"
Dim strUsuario As String = txtUsuario.Text
Dim strClave As String = txtClave.Text
' Parámetros
sqlComando.Parameters.Add(New SqlParameter("@Usuario", _ Data.SqlDbType.VarChar, 30)).Value = strUsuario
sqlComando.Parameters.Add(New SqlParameter("@Clave", _ Data.SqlDbType.VarChar, 30)).Direction = Data.ParameterDirection.Output
Try
sqlConexion.Open()
sqlComando.ExecuteNonQuery()
Dim strClaveBD As String = _ sqlComando.Parameters("@Clave").Value
If strClaveBD = "" Then
txtMensajes.Text = "Usuario No Autorizado"
Else
If strClaveBD = strClave Then
Response.Redirect("frmIntranet.aspx")
Else
txtMensajes.Text = "Clave Incorrecta"
End If
End If
Catch ex As Exception
End Try
End Sub
End Sub
Seguir navegando a partir aquí:
+ 1 manual relacionado+ 1 categoria relacionada
| Autoría, licencia y acciones sobre este artículo | ||||||
|
Informe de José del Carmen*
docente de Universidad Atención: Copyright. Este artículo no se puede reproducir sin la autorización expresa del autor. * Para consultas técnicas utilizar la lista de correo.
|
Manuales relacionados con este artículo
Categorias relacionadas
A través de las categorías de nuestro directorio se pueden encontrar otro tipo de recursos relacionados con este artículo:
+ Entrar en Scripts ASP.NET| Comentarios de los visitantes |
|
Aun no hemos recibido comentarios de este artículo.
Puedes ser el primero en enviar tu comentario. |
| Enlaces: |
| Maestrosdelweb |
Ir arriba
|
||||||||
Tienda DesarrolloWeb
