添加數(shù)據(jù)需要知道往哪張表添加,以及自己要添加的內(nèi)容,然后可用insert語句執(zhí)行。

創(chuàng)新互聯(lián)公司專注于企業(yè)成都全網(wǎng)營銷推廣、網(wǎng)站重做改版、河曲網(wǎng)站定制設(shè)計(jì)、自適應(yīng)品牌網(wǎng)站建設(shè)、H5建站、購物商城網(wǎng)站建設(shè)、集團(tuán)公司官網(wǎng)建設(shè)、外貿(mào)營銷網(wǎng)站建設(shè)、高端網(wǎng)站制作、響應(yīng)式網(wǎng)頁設(shè)計(jì)等建站業(yè)務(wù),價(jià)格優(yōu)惠性價(jià)比高,為河曲等各大城市提供網(wǎng)站開發(fā)制作服務(wù)。
1、以sqlserver2008r2為例,登錄SQL Server Management Studio到指定的數(shù)據(jù)庫。
2、登錄后點(diǎn)擊“新建查詢”。
3、比如要往test表中插入數(shù)據(jù),可先用如下語句查看一下表結(jié)構(gòu)及表內(nèi)數(shù)據(jù):
1
select * from test;
4、根據(jù)自己的實(shí)際情況添加輸入,比如要添加一條“16,du小小動”的數(shù)據(jù)。
1
insert into test (id,name) values (16,'du小小動');
執(zhí)行成功后會有提示:
5、此時(shí)數(shù)據(jù)庫中數(shù)據(jù)如下,說明添加成功。
可以通過使用insert 插入數(shù)據(jù)
語法:
INSERT INTO 表名稱 VALUES (值1, 值2,....)
我們也可以指定所要插入數(shù)據(jù)的列:
INSERT INTO table_name (列1, 列2,...) VALUES (值1, 值2,....)
Private Sub 入庫_click()
'默認(rèn)你的后面的textbox的名稱就是前面的名稱
'這里的數(shù)據(jù)類型可能要轉(zhuǎn)換,比如價(jià)格可能要轉(zhuǎn)換成double(CDbl()),購買日期轉(zhuǎn)行成日期時(shí)間型(CDate())
'假設(shè)你的數(shù)據(jù)表是aa,字段名和界面顯示是一樣的
Dim Rs As ADODB.Recordset
'在插入前建議你在aa表里查查這條記錄是否已經(jīng)存在,如果已經(jīng)存在則給出提示(查詢條件看你怎么設(shè)置的主鍵了)
Rs = objADO.GetRs("insert into aa (書名,定價(jià),作者,圖書類別,出版社,介質(zhì),購買日期,內(nèi)容簡介) values (" 書名.Text "," vbCrLf _
"定價(jià).text ", " 作者.text ", " 圖書類別.text ", " 出版社.text ", " 介質(zhì).text ", " 購買日期.text ", " 內(nèi)容簡介.text ")
'這里如果表aa的字段多于界面顯示的也沒關(guān)系,只會給你aa后面括號里的字段賦值,這里后面values的順序必須和前面的對應(yīng)
'正確插入后建議給個(gè)提示,同時(shí)看看有沒有必要把界面的所有值清空(圖書類別.text = "")
'這里的objADO建議這么定義Public objADO As SqlServer,有別的查詢也可以直接用,你自己怎么定義的就換成你自己的
'GetRs的定義在下面,你也可能是dim strsql as string,然后strsql = (上面的插入語句),然后用下面Rs.Open strSql, Conn, adOpenStatic, adLockReadOnly的方法,都行的,就看你自己怎么寫的了
End Sub
Public Function GetRs(ByVal strSql As String) As ADODB.Recordset '通過執(zhí)行SQL語句返回記錄集
Dim Rs As ADODB.Recordset
On Error GoTo Err0
If Not OpenDB Then
Exit Function
End If
Set Rs = New ADODB.Recordset
Rs.CursorLocation = adUseClient '使用本地(客戶端)游標(biāo),這樣Rs.RecordCount屬性才能正確返回記錄集行數(shù)
DoEvents
Rs.Open strSql, Conn, adOpenStatic, adLockReadOnly
Set GetRs = Rs
Exit Function
Err0:
If InStr(1, Err.Description, "通訊鏈接失敗") 0 Then
Set Conn = New ADODB.Connection
LocalStat = "斷開" '設(shè)置本地?cái)?shù)據(jù)庫連接狀態(tài)
End If
MsgBox Err.Description
End Function
標(biāo)準(zhǔn)語法:
簡寫語法:(省略字段名稱)
此寫法在給字段賦值的時(shí)候,必須保證順序和數(shù)據(jù)表結(jié)構(gòu)中字段順序完全一致,不推薦使用此種寫法,因?yàn)閿?shù)據(jù)表結(jié)構(gòu)變化的時(shí)候,數(shù)據(jù)會出錯(cuò)或產(chǎn)生錯(cuò)誤數(shù)據(jù)。
一次插入多行數(shù)據(jù):
其中DepartmentId,RankId,PeopleSalary均為數(shù)字類型,在賦值的時(shí)候不需要添加單引號,而其它類型需要添加單引號。
標(biāo)題名稱:sqlserver插入,sql數(shù)據(jù)庫
當(dāng)前地址:http://chinadenli.net/article23/dsigcjs.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供軟件開發(fā)、、標(biāo)簽優(yōu)化、網(wǎng)站營銷、Google、服務(wù)器托管
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來源: 創(chuàng)新互聯(lián)