update database from datagrid
-
Hi guys.Im looking to update my database from my datagrid. When u click on edit, it gives you an option to update or cancel action, so I need to update the database after making the change.Prolem with this code is that it work for txt boxes not datagrid, but it shudnt be that different. My previous code is like this, so Im hoping sumone will assist me in doing so. Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.SelectedIndexChanged If IsNumeric(txtFirstName.Text) Then MsgBox("Please type your name in letters", MsgBoxStyle.Critical, "KNS System-Error") Exit Sub End If If IsNumeric(txtCity.Text) Then MsgBox("Please type your City in letters", MsgBoxStyle.Critical, "KNS System-Error") Exit Sub End If If Not IsNumeric(txtPostalCode.Text) Then MsgBox("Please type your PostalCode in numbers", MsgBoxStyle.Critical, "KNS-System-Error") Exit Sub End If If Not IsNumeric(txtCelnumber.Text) Then MsgBox("Please type your Cellphonenumber in numbers", MsgBoxStyle.Critical, "KNS-System-Error") Exit Sub End If da = New OleDbDataAdapter("Select * From Employees", cn) cb = New OleDbCommandBuilder(da) ds = New DataSet ds.Clear() da.Fill(ds, "Employees") dt = New DataTable dt = ds.Tables("Employees") Dim dr() As DataRow dr = dt.Select("EmpID = " & txtEmpID.Text & "") dr(0).BeginEdit() 'dr(0)("Client_ID") = txtClientID.Text dr(0)("EFirstName") = txtFirstName.Text dr(0)("ESurname") = txtSurname.Text dr(0)("EDepartment") = cboDept.SelectedItem dr(0)("EPassword") = txtPassword.Text dr(0)("EConfirmPassword") = txtConfirm.Text dr(0)("EPhonenumber") = mtxtPhoneNumber.Text dr(0)("ECelnumber") = txtCelnumber.Text dr(0)("EAddress") = txtAddress.Text dr(0)("ECity") = txtCity.Text dr(0)("EPostalcode") = txtPostalCode.Text dr(0).EndEdit() da.Update(ds, "Employees") MsgBox("Record Edited Successfully") Disabling() End Sub Problem is that this I did with text boxes.What Im looking for is updating directly from the datagrid.Thanx in advance
kagiso
-
Hi guys.Im looking to update my database from my datagrid. When u click on edit, it gives you an option to update or cancel action, so I need to update the database after making the change.Prolem with this code is that it work for txt boxes not datagrid, but it shudnt be that different. My previous code is like this, so Im hoping sumone will assist me in doing so. Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.SelectedIndexChanged If IsNumeric(txtFirstName.Text) Then MsgBox("Please type your name in letters", MsgBoxStyle.Critical, "KNS System-Error") Exit Sub End If If IsNumeric(txtCity.Text) Then MsgBox("Please type your City in letters", MsgBoxStyle.Critical, "KNS System-Error") Exit Sub End If If Not IsNumeric(txtPostalCode.Text) Then MsgBox("Please type your PostalCode in numbers", MsgBoxStyle.Critical, "KNS-System-Error") Exit Sub End If If Not IsNumeric(txtCelnumber.Text) Then MsgBox("Please type your Cellphonenumber in numbers", MsgBoxStyle.Critical, "KNS-System-Error") Exit Sub End If da = New OleDbDataAdapter("Select * From Employees", cn) cb = New OleDbCommandBuilder(da) ds = New DataSet ds.Clear() da.Fill(ds, "Employees") dt = New DataTable dt = ds.Tables("Employees") Dim dr() As DataRow dr = dt.Select("EmpID = " & txtEmpID.Text & "") dr(0).BeginEdit() 'dr(0)("Client_ID") = txtClientID.Text dr(0)("EFirstName") = txtFirstName.Text dr(0)("ESurname") = txtSurname.Text dr(0)("EDepartment") = cboDept.SelectedItem dr(0)("EPassword") = txtPassword.Text dr(0)("EConfirmPassword") = txtConfirm.Text dr(0)("EPhonenumber") = mtxtPhoneNumber.Text dr(0)("ECelnumber") = txtCelnumber.Text dr(0)("EAddress") = txtAddress.Text dr(0)("ECity") = txtCity.Text dr(0)("EPostalcode") = txtPostalCode.Text dr(0).EndEdit() da.Update(ds, "Employees") MsgBox("Record Edited Successfully") Disabling() End Sub Problem is that this I did with text boxes.What Im looking for is updating directly from the datagrid.Thanx in advance
kagiso
Guys, I found something but still I get errors. Code. Protected Sub GridView1_RowUpdated(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdatedEventArgs) Handles GridView1.RowUpdated Dim cm As New OleDbCommand Dim con As New OleDbConnection Dim str1 As String = "Provider = Microsoft.Jet.oledb.4.0; Data source =C:\Documents and Settings\Kagisho.Mashiloane.ALFRGIS\My Documents\Visual Studio 2005\Projects\Search AL\TelephoneList.mdb" Dim str2 As String con = New OleDbConnection(str1) con.Open() str2 = "select * From Extensions" cm = New OleDbCommand(str2, con) Dim updateSQL As String = "UPDATE Extension SET Name = @Name, " & "Surname = @Surname, " & "Xtension = @Xtension" cm.Parameters.Clear() cm.Parameters.Add("@Name", Name) cm.Parameters.Add("@Surname", Surname) cm.Parameters.Add("@Xtension", Xtension) cm.ExecuteNonQuery() 'Next lblUpdatemessage.Text = "Update Successfull"
kagiso