<%@ Page Language="VB" AutoEventWireup="false"
CodeFile="ModificarUsuario.aspx.vb" Inherits="ModificarUsuario" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Modificar un usuario (VB)</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<div style="text-align: center">
<table border="1" cellpadding="4" style="width: 90%">
<tr>
<td align="left" style="width: 100px" valign="top">
<asp:Label ID="Label1" runat="server" Text="Correo" />
</td>
<td align="left" style="width: 80%" valign="top">
<asp:TextBox ID="txtCorreo" runat="server" />
<asp:Button ID="btnMostrar" runat="server"
Text="Mostrar" />
</td>
</tr>
<tr>
<td align="left" style="width: 100px" valign="top">
<asp:Label ID="Label2" runat="server" Text="Clave" />
</td>
<td align="left" style="width: 80%" valign="top">
<asp:TextBox ID="txtClave" runat="server" Width="90%" /><br />
<asp:Button ID="btnClaveSha1" runat="server"
Text="Generar clave SHA1" />
<asp:Label ID="Label6" runat="server"
Text="Pulsa en este botón solo si escribes una clave normal
y quieres convertirla a SHA1" />
</td>
</tr>
<tr>
<td align="left" style="width: 100px" valign="top">
<asp:Label ID="Label3" runat="server" Text="Nombre" />
</td>
<td align="left" style="width: 80%" valign="top">
<asp:TextBox ID="txtNombre" runat="server" />
</td>
</tr>
<tr>
<td align="left" style="width: 100px" valign="top">
<asp:Label ID="Label5" runat="server" Text="Fecha" />
</td>
<td align="left" style="width: 80%" valign="top">
<asp:TextBox ID="txtFecha" runat="server"
BackColor="WhiteSmoke" ReadOnly="True" />
</td>
</tr>
<tr>
<td align="left" style="width: 100px" valign="top">
<asp:Label ID="Label4" runat="server" Text="Comentarios" />
</td>
<td align="left" style="width: 80%" valign="top">
<asp:TextBox ID="txtComentarios" runat="server"
Columns="60" Rows="4" TextMode="MultiLine" />
</td>
</tr>
<tr>
<td colspan="2" style="height: 28px">
<asp:Button ID="btnActualizar" runat="server" Text="Actualizar" />
</td>
</tr>
<tr>
<td colspan="2">
<asp:Label ID="lblAviso" runat="server" Text="Label" Width="100%" />
</td>
</tr>
<tr>
<td align="left" colspan="2" valign="top">
<asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server"
ControlToValidate="txtCorreo"
ErrorMessage="Debes escribir algo en la cuenta de correo" />
<asp:RegularExpressionValidator ID="RegularExpressionValidator1" runat="server"
ControlToValidate="txtCorreo"
ErrorMessage="La cuenta de correo no es valida"
ValidationExpression="\w+([-+.']\w+)*@\w+([-.]\w+)*\.\w+([-.]\w+)*" />
</td>
</tr>
</table>
</div>
<asp:SqlDataSource ID="SqlDataSource1" runat="server"
ConnectionString="<%$ ConnectionStrings:vwdTut01ConnectionString1 %>"
DeleteCommand="DELETE FROM [Usuarios] WHERE [ID] = @ID"
InsertCommand="INSERT INTO [Usuarios] ([Correo], [Clave], [Nombre], [Fecha], [Comentarios])
VALUES (@Correo, @Clave, @Nombre, @Fecha, @Comentarios)"
ProviderName="<%$ ConnectionStrings:vwdTut01ConnectionString1.ProviderName %>"
SelectCommand="SELECT [ID], [Correo], [Clave], [Nombre], [Fecha], [Comentarios]
FROM [Usuarios]"
UpdateCommand="UPDATE [Usuarios] SET [Correo] = @Correo, [Clave] = @Clave,
[Nombre] = @Nombre, [Fecha] = @Fecha, [Comentarios] = @Comentarios
WHERE [ID] = @ID">
<InsertParameters>
<asp:Parameter Name="Correo" Type="String" />
<asp:Parameter Name="Clave" Type="String" />
<asp:Parameter Name="Nombre" Type="String" />
<asp:Parameter Name="Fecha" Type="DateTime" />
<asp:Parameter Name="Comentarios" Type="String" />
</InsertParameters>
<UpdateParameters>
<asp:Parameter Name="Correo" Type="String" />
<asp:Parameter Name="Clave" Type="String" />
<asp:Parameter Name="Nombre" Type="String" />
<asp:Parameter Name="Fecha" Type="DateTime" />
<asp:Parameter Name="Comentarios" Type="String" />
<asp:Parameter Name="ID" Type="Int32" />
</UpdateParameters>
<DeleteParameters>
<asp:Parameter Name="ID" Type="Int32" />
</DeleteParameters>
</asp:SqlDataSource>
<br />
<div style="text-align:center">
<asp:HyperLink ID="HyperLink1" runat="server" NavigateUrl="~/Default.aspx">
Volver al índice
</asp:HyperLink>
</div>
</div>
</form>
</body>
</html>
|
