1、實(shí)驗(yàn)項(xiàng)目名稱 實(shí)驗(yàn)四：嵌入式SQL的使用 一、實(shí)驗(yàn)?zāi)康?、明確嵌入式SQL的意義。2、學(xué)會(huì)使用不用游標(biāo)的DML語句。3、學(xué)會(huì)使用使用游標(biāo)的DML語句。二、實(shí)驗(yàn)環(huán)境在Win7-32系統(tǒng)下,用Microsoft SQL Server Management Studio實(shí)現(xiàn)的三、實(shí)驗(yàn)內(nèi)容以學(xué)生選課數(shù)據(jù)庫為中心，使用PowerBuilder語言(Vb或Delphi)，設(shè)計(jì)一個(gè)數(shù)據(jù)錄入、查詢窗口，進(jìn)行練習(xí)。不用游標(biāo)語句 2、使用游標(biāo)的語句實(shí)驗(yàn)結(jié)果1、不用游標(biāo)語句（1）查詢結(jié)果為單記錄的SELECT語句 格式：SELECT 目標(biāo)列INTO 主變量FROM 基本表（或視圖）WHERE 條件表達(dá)式； 如：根據(jù)

2、主變量GIVENS#的值找該學(xué)生的信息SELECT SN，SD，SAINTO :SNAME，:DEPT，:AGEFROM SWHERE S#=:GIVENS#；（2）UPDATE語句 如：UPDATE SSET SA=NULLWHERE SD=”CS”（3）DELETE語句 如：DELETEFROM SCWHERE :DEPT=（SELECT SD FROM S WHERE S.S#=SC.S#);2、使用游標(biāo)的語句（1）查詢結(jié)果為單記錄的SELECT語句格式：SELECT 目標(biāo)列INTO 主變量FROM 基本表（或視圖）WHERE 條件表達(dá)式；如：根據(jù)主變量GIVENS#的值找該學(xué)生的信息S

3、ELECT SN，SD，SAINTO :SNAME，:DEPT，:AGEFROM SWHERE S#=:GIVENS#；2.查詢數(shù)據(jù)Update語句UPDATE SSET SA=NULLWHERE SD=”MA”（3）DELETE語句如：DELETEFROM SCWHERE :sd=（SELECT SD FROM S WHERE S.S#=SC.S#);已刪除4）INSERT語句如：INSERTINTO S(S#,SN,SD,SG,SEX)VALUES(:GIVENS#,:SNAME,:DEPT)使用C#操作的代碼:using System;using System.Collections.G

4、eneric;using System.ComponentModel;using System.Data;using System.Drawing;using System.Linq;using System.Text;using System.Windows.Forms;using System.Data.SqlClient;namespace Sql public partial class Form1 : Form public Form1() InitializeComponent(); private void Form1_Load(object sender, EventArgs

5、e) l1.Text = 請(qǐng)連接數(shù)據(jù)庫!; static SqlConnection sql = null;/創(chuàng)建連接對(duì)象 static SqlCommand stu = new SqlCommand();/創(chuàng)建對(duì)象 private void button1_Click(object sender, EventArgs e) if (textBox1.Text = ) MessageBox.Show(null,請(qǐng)輸入數(shù)據(jù)庫名稱,0,MessageBoxIcon.Error); else try string sc = server=A506;database= + textBox1.Text.

6、Trim() + ;uid=sa;pwd=123; sql = new SqlConnection(sc); sql.Open(); if (sql.State = ConnectionState.Open) l1.Text = 連接成功; button3.Enabled = true; catch(Exception ex) MessageBox.Show(ex.Message); /l1.Text= 連接失敗請(qǐng)重試; private void button2_Click(object sender, EventArgs e) try sql.Close(); if (sql.State =

7、 ConnectionState.Closed) l1.Text = 關(guān)閉成功; catch l1.Text = 關(guān)閉失敗，請(qǐng)連接數(shù)據(jù)庫！; private void sqls(string str)/數(shù)據(jù)庫操作函數(shù)用接SQL語句? try stu.Connection = sql;/設(shè)置連接屬性 DataSet ds = new DataSet(); SqlDataAdapter sda = new SqlDataAdapter(str, sql); sda.Fill(ds, student); dataGrid1.DataSource = ds.Tablesstudent.DefaultV

8、iew; catch (Exception ex) / 查詢失?。? MessageBox.Show(ex.Message); private void updata(string str) try stu.Connection = sql; stu = new SqlCommand(str, sql); stu.ExecuteNonQuery(); l1.Text = 更新成功！; catch MessageBox.Show(更新失敗請(qǐng)重試！); private void button3_Click(object sender, EventArgs e) string select = se

9、lect * from student where sno= + textBox2.Text.Trim(); sqls(select); private void button5_Click(object sender, EventArgs e) string select = select * from student where sdept= + textBox2.Text.Trim()+; sqls(select); private void button4_Click(object sender, EventArgs e) string upda=UPDATE student SET

10、sage=null WHERE sdept=+textBox2.Text.Trim()+; updata(upda); private void sqlinsert(string str) try stu.Connection = sql; stu = new SqlCommand(str, sql); stu.ExecuteNonQuery(); l1.Text = 插入成功，請(qǐng)查詢！; catch(Exception ex) MessageBox.Show(插入失敗請(qǐng)重試?+ex.Message); private void button6_Click(object sender, Eve

11、ntArgs e) try string sno, sname, sd, sage, sex;/讀取單元格內(nèi)容 sno = data1.CurrentRow.Cells0.Value.ToString(); sname = data1.CurrentRow.Cells1.Value.ToString(); sd = data1.CurrentRow.Cells2.Value.ToString(); sage = data1.CurrentRow.Cells3.Value.ToString(); sex = data1.CurrentRow.Cells4.Value.ToString(); l1

12、.Text = sno + sname + sd + sage + sex; string insert = INSERT INTO student(sno,sname,sdept,sage,ssex) VALUES( + sno.Trim() + , + sname.Trim() + , + sd.Trim() + , + sage.Trim() + , + sex.Trim() + ); sqlinsert(insert); catch MessageBox.Show(請(qǐng)檢查輸入內(nèi)容!); private void button7_Click(object sender, EventArg

13、s e) data1.Visible = true; private void sqldelete(string str) try stu.Connection = sql; stu = new SqlCommand(str, sql); stu.ExecuteNonQuery(); l1.Text = 刪除成功請(qǐng)查詢?; catch(Exception ex) MessageBox.Show(刪除失敗請(qǐng)重試+ex.Message); private void button8_Click(object sender, EventArgs e) string delete = delete from student where sno= + textBox2.