Ver Mensaje Individual
  #1 (permalink)  
Antiguo 14/01/2003, 09:34
Avatar de AIgnacio
AIgnacio
 
Fecha de Ingreso: diciembre-2002
Mensajes: 131
Antigüedad: 21 años, 5 meses
Puntos: 0
Mensaje Base de datos

Hola a todo queria saber como puedo hacer para refrescar una base de datos cada vez que le agrege en un campo informacion me actualice o sea que me refresque la base de datos que se encuentra en la pagina y esta visible
Mi codigo es: y esta en webmatrix asp. net
<%@ Page Language="VB" %>
<%@ Register TagPrefix="wmx" Namespace="Microsoft.Saturn.Framework.Web.UI" Assembly="Microsoft.Saturn.Framework, Version=0.5.464.0, Culture=neutral, PublicKeyToken=6f763c9966660626" %>
<script runat="server">

Function Insertar(ByVal codigodearticulo As Integer, ByVal detalle As String, ByVal stock As Integer, ByVal stockMinimo As Integer) As Integer
Dim connectionString As String = "server='localhost'; trusted_connection=true; Database='art'"
Dim sqlConnection As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection(connectionStri ng)

Dim queryString As String = "INSERT INTO [Artic] ([Codigo de articulo], [Detalle], [Stock], [Stock Minimo]) VALUES (@Codigodearticulo, @Detalle, @Stock, @StockMinimo)"
Dim sqlCommand As System.Data.SqlClient.SqlCommand = New System.Data.SqlClient.SqlCommand(queryString, sqlConnection)

sqlCommand.Parameters.Add("@Codigodearticulo", System.Data.SqlDbType.Int).Value = codigodearticulo
sqlCommand.Parameters.Add("@Detalle", System.Data.SqlDbType.Text).Value = detalle
sqlCommand.Parameters.Add("@Stock", System.Data.SqlDbType.Int).Value = stock
sqlCommand.Parameters.Add("@StockMinimo", System.Data.SqlDbType.Int).Value = stockMinimo

Dim rowsAffected As Integer = 0
sqlConnection.Open
Try
rowsAffected = sqlCommand.ExecuteNonQuery
Finally
sqlConnection.Close
End Try

Return rowsAffected
End Function

Sub Button1_Click(sender As Object, e As EventArgs)
If sto.Text<stomin.Text
Message.Text = "Cargado mal el stock"
Else

If Insertar(Cod.Text, Deta.Text, Sto.Text, Stomin.Text) > 0
Message.Text = "Cargo bien"



End If
End If
End Sub

</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p>
<asp:TextBox id="Cod" runat="server"></asp:TextBox>
Cod Art
</p>
<p>
<asp:TextBox id="Deta" runat="server"></asp:TextBox>
Detalle
</p>
<p>
<asp:TextBox id="Sto" runat="server"></asp:TextBox>
Stock
</p>
<p>
<asp:TextBox id="Stomin" runat="server"></asp:TextBox>
Stock Minimo
</p>
<p>
<asp:Label id="Message" runat="server"></asp:Label>
</p>
<p>
<asp:Button id="Button1" onclick="Button1_Click" runat="server" Text="Button"></asp:Button>
</p>
<p>
<wmx:SqlDataSourceControl id="SqlDataSourceControl1" runat="server" UpdateCommand="UPDATE [Artic] SET [Codigo de articulo]=@param1,[Detalle]=@Detalle,[Stock]=@Stock,[Stock Minimo]=@param4 WHERE [Codigo de articulo]=@param5" SelectCommand="SELECT * FROM [Artic]" AutoGenerateUpdateCommand="False" ConnectionString="server='localhost'; trusted_connection=true; Database='art'" DeleteCommand=""></wmx:SqlDataSourceControl>
<wmx:MxDataGrid id="MxDataGrid1" runat="server" DataSourceControlID="SqlDataSourceControl1" BorderColor="#CCCCCC" AllowSorting="True" AutoGenerateFields="False" DataMember="Artic" AllowPaging="True" BackColor="White" CellPadding="3" DataKeyField="Codigo de articulo" BorderWidth="1px" BorderStyle="None">
<PagerStyle horizontalalign="Center" forecolor="#000066" backcolor="White" mode="NumericPages"></PagerStyle>
<FooterStyle forecolor="#000066" backcolor="White"></FooterStyle>
<SelectedItemStyle font-bold="True" forecolor="White" backcolor="#669999"></SelectedItemStyle>
<ItemStyle forecolor="#000066"></ItemStyle>
<Fields>
<wmx:BoundField DataField="Numero" SortExpression="Numero" HeaderText="Numero"></wmx:BoundField>
<wmx:BoundField DataField="Codigo de articulo" SortExpression="Codigo de articulo" HeaderText="Codigo de articulo"></wmx:BoundField>
<wmx:BoundField DataField="Detalle" SortExpression="Detalle" HeaderText="Detalle"></wmx:BoundField>
<wmx:BoundField DataField="Stock" SortExpression="Stock" HeaderText="Stock"></wmx:BoundField>
<wmx:BoundField DataField="Stock Minimo" SortExpression="Stock Minimo" HeaderText="Stock Minimo"></wmx:BoundField>
</Fields>
<HeaderStyle font-bold="True" forecolor="White" backcolor="#006699"></HeaderStyle>
</wmx:MxDataGrid>
</p>
<!-- Insert content here -->
</form>
</body>
</html>