本文介绍了如何更新访问表字段的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧! 问题描述 29岁程序员,3月因学历无情被辞! 嗨朋友们, 我在Visual Studio-2015中使用Access数据库作为后端开发项目。在代码下运行时,我没有遇到任何错误消息,也没有更新表中的记录: 请帮助 我尝试了什么: Private Sub BtnUpdate_Click(sender As Object,e As EventArgs)Handles BtnUpdate.Click BtnUpdate.Enabled = False:Dbconnection.Close():Dbconnection.Open() EdtEmpCmd.CommandText =UPDATE EMP_MASTER& (SET Sap_No = @Sap_No,CPF_No = @CPF_No,Name = @Name,Designation = @Designation,DesigIndex = @DesigIndex,CompJoining = @CompJoining)& (TPSJoining = @ TPSJoining,QtrNo = @QtrNo,DOB = @DOB,DOR = @DOR,BloodGroup = @BloodGroup,MobileNo = @MobileNo,CLAvail = @CLAvail)& (FLAvail = @ FLAvail,CLBal = @CLBal,FLBal = @ FLBal,EmailID = @EmailID,状态= @状态,其中Sap_No = @Sap_No); EdtEmpCmd.CommandType = CommandType.Text 尝试 EdtEmpCmd.Parameters.AddWithValue(@ Sap_No,CInt(TxtSapID.Text)) EdtEmpCmd.Parameters.AddWithValue(@ CPF_No,TxtCPFNo.Text.ToString()) EdtEmpCmd.Parameters.AddWithValue(@ Name,TxtEmpName.Text.ToString()) EdtEmpCmd.Parameters。 AddWithValue(@ Designation,CmbDesignation.Text.ToString()) EdtEmpCmd.Parameters.AddWithValue(@ DesigIndex,CmbDesignation.SelectedIndex + 1) EdtEmpCmd。 Parameters.AddWithValue(@ CompJoining,DtpCompJoining.Value.ToShortDateString) EdtEmpCmd.Parameters.AddWithValue(@ TPSJoining,DtpTPSJoining.Value.ToShortDateString) EdtEmpCmd。 Parameters.AddWithValue(@ QtrNo,TxtQtrNo.Text.ToString()) EdtEmpCmd.Parameters.AddWithValue(@ DOB,DtpBirthDate.Value.ToShortDateString) EdtEmpCmd.Parameters.AddWithValue(@ DOR,DtpRetirementDate.Value.ToShortDateString) EdtEmpCmd.Parameters.AddWithValue(@ BloodGroup,CmbBloodGroup.Text.ToString()) EdtEmpCmd.Parameters.AddWithValue(@ MobileNo,TxtMobileNo.Text.ToString()) EdtEmpCmd.Parameters.AddWithValue(@ CLAvail,CInt(TxtClAvail.Text)) EdtEmpCmd.Parameters.AddWithValue(@ FLAvail,CInt(TxtFlAvail.Text)) EdtEmpCmd.Parameters.AddWithValue(@ CLBal,(CInt(15 - TxtClAvail.Text))) EdtEmpCmd.Parameters.AddWithValue(@ FLBal,(CInt( 6 - TxtFlAvail.Text))) EdtEmpCmd.Parameters.AddWithValue(@ EmailID,TxtEmailID.Text.ToString()) EdtEmpCmd.Parameters.AddWithValue( @Status,A) AddEmpCmd.ExecuteNonQuery() Call Sc rnClr() Dbconnection.Close()'退出Sub Catch ex As Exception MessageBox.Show(ex.Message) 结束尝试 结束Sub 解决方案 这篇关于如何更新访问表字段的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持! 上岸,阿里云!
07-15 07:28