te BindingManagerBase myBind public Data file://连接到一个数据库GetConnected // 对窗体中所需要的内容进行初始化InitializeComponent file://清除在程序中使用过的资源protected override void Dispose bool disposing if disposing if components null components.Dispose base.Dispose disposing public static void Main Application.Run new Data public void GetConnected tryfile://创建一个 OleDbConnectionstring strCon quot Provider Microsoft.Jet.OLEDB.4.0 Data Source db.mdbquot OleDbConnection myConn new OleDbConnection strCon string strCom quot SELECT FROM person quot file://创建一个 DataSetmyDataSet new DataSet myConn.Open file://用 OleDbDataAdapter 得到一个数据集OleDbDataAdapter myCommand new OleDbDataAdapter strCom myConn file://把 Dataset 绑定 books 数据表myCommand.Fill myDataSet quotpersonquot file://关闭此 OleDbConnectionmyConn.Close catch Exception e MessageBox.Show quot连接错误 quot e.ToString quot错误quot private void InitializeComponent file://添加控件,略this.Name quotDataquot this.Text quotVisual C#的数据库编程!quot this.ResumeLayoutfalse myBind this.BindingContext myDataSet quotpersonquot protected void New_record object sender System.EventArgs e t_id.Text myBind.Count 1 .ToString t_xm.Text quotquot t_xb.Text quotquot t_nl.Text quotquot t_books.Text quotquot protected void Insert_record object sender System.EventArgs e tryfile://判断所有字段是否添完,添完则执行,反之弹出提示if t_id.Text quotquot ampamp t_xm.Text quotquot ampamp t_xb.Text quotquot ampamp t_nl.Text quotquotampamp t_books.Text quotquot string myConn1 quot Provider Microsoft.Jet.OLEDB.4.0 Data Source db.mdbquot OleDbConnection myConn new OleDbConnection myConn1 myConn.Open string strInsert quot INSERT INTO person id xm xb nl zip VALUES quot strInsert t_id.Text quot quot strInsert t_xm.Text quot quot strInsert t_xb.Text quot quot strInsert t_nl.Text quot quot strInsert t_books.Text quotquot OleDbCommand inst new OleDbCommand strInsert myConn inst.ExecuteNonQuery myConn.Close myDataSet.Tables quotpersonquot . Rows myBind.Position . BeginEdit myDataSet.Tables quotpersonquot . Rows myBind.Position . EndEdit myDataSet.Tables quotpersonquot . AcceptChanges elseMessageBox.Show quot必须填满所有字段值!quot quot错误!quot catch Exception ed MessageBox.Show quot保存数据记录发生 quot ed.ToString quot错误!quot protected void Update_record object sender System.EventArgs e int i myBind.Position tryfile://连接到一个数据库string strCon quot Provider Microsoft.Jet.OLEDB.4.0 Data Source db.mdb quot OleDbConnection myConn new OleDbConnection strCon myConn.Open myDataSet.Tables quotpersonquot . Rows myBind.Position . BeginEdit file://从数据库中修改指定记录string strUpdt quot UPDATE person SET xm quot t_xm.Text quot xb quot t_xb.Text quot nl quot t_nl.Text quot zip quot t_books.Text quot WHERE id quot t_id.Text OleDbCommand myCommand new OleDbCommand strUpdt myConn myCommand.ExecuteNonQuery myDataSet.Tables quotpersonquot . Rows myBind.Position . EndEdit myDataSet.Tables quotpersonquot . AcceptChanges myConn.Close catch Exception ed MessageBox.Show quot修改指定记录错误: quot ed.ToString quot错误!quot myBind.Position i protected void Delete_record object sender System.EventArgs e DialogResult r MessageBox.Show quot是否删除当前记录!quot quot删除当前记录!quot MessageBoxButtons.YesNo MessageBoxIcon.Question int ss int r if ss 6 // 按动quot确定quot按钮tryfile://连接到一个数据库string strCon quot Provider Microsoft.Jet.OLEDB.4.0 Data Source db.mdb quot OleDbConnection myConn new OleDbConnection strCon myConn.Open string strDele quotDELETE FROM person WHERE id quot t_id.Text OleDbCommand myCommand new OleDbCommand strDele myConn file://从数据库中删除指定记录myCommand.ExecuteNonQuery file://从 DataSet 中删除指定记录myDataSet.Tables quotpersonquot . Rows myBind.Position . Delete myDataSet.Tables quotpersonquot . AcceptChanges myConn.Close catch Exception ed MessageBox.Show quot删除记录错误信息: quot ed.ToString quot错误!quot file://按钮quot尾记录quot对象事件程序protected void GoLast object sender System.EventArgs e myBind.Positio.
上一篇:
能源计量数据采集系统数据传输协议[1]【精品文档
下一篇:
工程硕士毕业论文写作内容有什么要求