前面用过Access的通讯录,下面用一个SQLserver的通讯录。
首先,在SQL2012中建立一个表,插入一个记录:
use Sales go create table txl ( tID int identity(10000,1) primary key,tName varchar(50) not null,tEmail varchar(50),tMobile char(11),tHomePhone varchar(12),tMemo varchar(2000) --备注 ) insert into txl values('令狐冲','yms@sohu.com','13681246528','62349087','一个剑客')
注:identity(seed,incre)第一个表示起点,第二表示增量。10000,1表示记录从10000开始,每一个记录数据增加加1.
所以第二条记录的标号就是10001.
下面用VB.net对其插入记录,并显示。
注意:SQL语句中的单引号
Imports System.Data.SqlClient Public Class Form1 Dim cn As SqlConnection Dim cmd As SqlCommand Dim da As SqlDataAdapter Dim ds As DataSet Private Sub Button1_Click(sender As Object,e As EventArgs) Handles Button1.Click Try cn = New SqlConnection("Data Source=.;Initial Catalog=Sales;Integrated Security=False;User ID=sa;Password=123456;") cn.Open() cmd = New SqlCommand("insert into txl values('" & TextBox1.Text & "','" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "','" & TextBox5.Text & "')",cn) cmd.ExecuteNonQuery() cn.Close() MessageBox.Show("插入成功") Catch ex As Exception MessageBox.Show(ex.ToString & cmd.CommandText) End Try End Sub Private Sub Button3_Click(sender As Object,e As EventArgs) Handles Button3.Click cn = New SqlConnection("Data Source=.;Initial Catalog=Sales;Integrated Security=False;User ID=sa;Password=123456;") da = New SqlDataAdapter("select * from txl",cn) ds = New DataSet() da.Fill(ds,"txl") DataGridView1.DataSource = ds.Tables("txl") cn.Close() End Sub Private Sub Button2_Click(sender As Object,e As EventArgs) Try cn = New SqlConnection("Data Source=.;Initial Catalog=Sales;Integrated Security=False;User ID=sa;Password=123456;") cn.Open() cmd = New SqlCommand("insert into txl values('" & TextBox1.Text & "',cn) cmd.ExecuteNonQuery() cn.Close() MessageBox.Show("插入成功") Catch ex As Exception MessageBox.Show(ex.ToString & cmd.CommandText) End Try End Sub End Class
由引我们学习了Access和SQlserver查看记录和修改记录的例子。
一,查询与非查询的操作。
二,存储过程的操作,参数是如何添加的。
版权声明:本文内容由互联网用户自发贡献,该文观点与技术仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请发送邮件至 dio@foxmail.com 举报,一经查实,本站将立刻删除。