第八次实验报告_第1页
第八次实验报告_第2页
第八次实验报告_第3页
已阅读5页,还剩2页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

1、宁波大学实验报告实验课程名称:数据库应用与开发院: 学专业:信息管理与信息系统指 导 教师:萌报告人 王晓莹学号信管班级:20162017学期:商科实验教学中心制实验成绩实验项目名称模糊一、实验目的与要求:二、实验设备及软件:VS2010三、实验方法(原理、流程图)四、实验过程、步骤及内容代码:using System;using System.Collections.Generic; using System.ComponentM; using System.Data;using System.Drawing; using System.Linq; using Sy

2、stem.Text;using System.Windows.Forms; using System.Data.OleDb;namespace 实害?验é8public partial class Form1 : Formpublic Form1()InitializeComponent();private void dataGridView1_CellClick(object sender, DataGridViewCellEventArgs e)textBox1.Text = dataGridView10, e.RowIndex.Value.ToString(); textBox

3、2.Text = dataGridView11, e.RowIndex.Value.ToString();private void button2_Click(object sender, EventArgs e)OleDbConnection my= new OleDbConnection(); OleDbCommand CMD = new OleDbCommand();/OleDbDataReader Reader; DataSet dt = new DataSet();OleDbDataAdapter adpter = new OleDbDataAdapter();my.Connecti

4、onString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:c#程ì序ò设?计?2017-4-5 第 ?五?次?上?机ú实害?验émy.mdb"CMD.Connection = my; my.Open();CMD.CommandText = "select * from 学§生?獁 here 学§号?='" + textBox1.Text + "'"object t = CMD.ExecuteScala

5、r(); if (t != null)MessageBox.Show("错洙?误ó已?存?在ú"); return;CMD.CommandText = "insert into 学§生?学§号?,values('" + textBox1.Text + "','" + textBox2.Text + "')"CMD.ExecuteNonQuery();CMD.CommandText = "select 学§号?,from 学&

6、#167;生?;/dt.Clear(); adpter.SelectCommand = CMD; adpter.Fill(dt, "Database3");dataGridView1.DataSource = dt.Tables"Database3" my.Close();MessageBox.Show("添 ?加ó成é功|");/添 ? ¨?加óó?信?息éprivate void button3_Click(object sender, EventArgs e)OleDb

7、Connection my= new OleDbConnection(); OleDbCommand CMD = new OleDbCommand();/OleDbDataReader Reader; DataSet dt = new DataSet();OleDbDataAdapter adpter = new OleDbDataAdapter();my.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:c#程ì序ò设?计?2017-4-5 第 ?五?次?上?机ú实害?

8、验émy.mdb"CMD.Connection = my; my.Open();CMD.CommandText = "select * from 学§生?獁 here 学§号?='" + textBox1.Text + "'"object t = CMD.ExecuteScalar(); if (t = null)MessageBox.Show("不?存?在ú该?学§号?,?删?除 y 失骸?败悒?);CMD.CommandText = "delete fro

9、m 学§生?獁 here 学§号?='" + textBox1.Text+ "'"CMD.ExecuteNonQuery(); dt.Clear();CMD.CommandText = "select * from 学§生?;/CMD.CommandText = "select 学§号?,from 学§生?獁 here 学§号? like '%" + textBox1.Text + "%' order by 学§号?&quo

10、t;adpter.SelectCommand = CMD; adpter.Fill(dt, "Database3");dataGridView1.DataSource = dt.Tables"Database3" my.Close();MessageBox.Show("删?除 y 成é功|");private void button4_Click(object sender, EventArgs e)OleDbConnection my= new OleDbConnection(); OleDbCommand CMD = n

11、ew OleDbCommand();/OleDbDataReader Reader; DataSet dt = new DataSet();OleDbDataAdapter adpter = new OleDbDataAdapter();my.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:c#程ì序ò设?计?2017-4-5 第 ?五?次?上?机ú实害?验émy.mdb"CMD.Connection = my; my.Open();CMD.Comm

12、andText = "update 学§生?猻 et 姓?名?='" + textBox2.Text + "'where 学§号?= '"+textBox1.Text+ "'"CMD.ExecuteNonQuery(); dt.Clear();CMD.CommandText = "select * from 学§生?;adpter.SelectCommand = CMD; adpter.Fill(dt, "students");dataGrid

13、View1.DataSource = dt.Tables"students" my.Close();private void button1_Click(object sender, EventArgs e)OleDbConnection my= new OleDbConnection(); OleDbCommand CMD = new OleDbCommand();/OleDbDataReader Reader; DataSet dt = new DataSet();OleDbDataAdapter adpter = new OleDbDataAdapter();my.C

14、onnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:c#程ì序ò设?计?2017-4-5 第 ?五?次?上?机ú实害?验émy.mdb"CMD.Connection = my; my.Open();dt.Clear();CMD.CommandText = "select * from 学§生?; adpter.SelectCommand = CMD;adpter.Fill(dt, "Database3"); data

15、GridView1.DataSource = dt.Tables"Database3" my.Close();MessageBox.Show("刷新?成é功|");private void button5_Click(object sender, EventArgs e)OleDbConnection my= new OleDbConnection(); OleDbCommand CMD = new OleDbCommand();/OleDbDataReader Reader; DataSet dt = new DataSet();OleDbD

16、ataAdapter adpter = new OleDbDataAdapter();my.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:c#程ì序ò设?计?2017-4-5 第 ?五?次?上?机ú实害?验émy.mdb"CMD.Connection = my; my.Open();dt.Clear();if (comboBox1.Text = "学§号?")CMD.CommandText = "select

17、 学§号?,from 学§生?獁 here 学§ 号?like '%" + textBox3.Text + "%' order by 学§号?"adpter.SelectCommand = CMD; adpter.Fill(dt, "Database3");dataGridView1.DataSource = dt.Tables"Database3" my.Close();MessageBox.Show("学§号?搜?索÷成é功|!?");elseCMD.CommandText = "select 学§号?,rom 学§生?獁 here like '%" + textBox3.Text + "%' order by 学§号?"adpter.Sele

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论