㈠ vb中怎麼使用sql
select
*
from
成績表
where
姓名='張大保'
翻譯為中文就是
從「成績表」中選擇所有姓名是「張大保」的記錄
From
從......
From
成績表
就是「從成績表...」的意思
Form
是表格、表單的意思,用在這里是沒意義的
另外在條件前面要加上where,意思就是在什麼地方去找你要的東西
這些都是最基本的,你先把sql的語法搞清楚了再到VB中應用
㈡ vb怎麼執行sql語句
先是定義一個字元串變數,然後把你要寫的SQL語句賦給它。這時如果要把一些VB控制項里的數據加進去也一樣就是一個字元串聯接而以,唯一要注意的是標點符號的使用如:' 這個符號,因為很多時候要用到這個,我碰到好多人都是這里出錯了。例如:Dim strsql As String
strsql = "select * from TblSystemData"
If dh.Text <> " " Then '單號
strsql = strsql & " where ChrCode like " & "'" & dh.Text & "'"
End If
當然你也可以把第一個它移到前面去。但我是單獨放出來,這樣更清楚一點。
接著是執行了。這個你可以看一下二樓的。例如:rst3.Open strsqlm con1_offer, adOpenKeyset, adLockOptimistic, adCmdText
㈢ vb.net引用sql server中的函數
VB.NET中可以直接通過sql語句來如:cmd.selectcomand="select count(year(參加工作時間) ) from 表 「
現在建議你使用Linq ,lumbda來做
sql的函數再復雜好用,也沒有你在應用程序中寫的函數復雜。不要把資料庫當業務邏輯來弄,我覺得這不是一個好的思路。
㈣ VB如何調SQL函數
dim db as database
dim rs as recordset
dim sqlstr as string
'利用 DAO
private sub form_load()
set db=opendatabase(app.path & "\db.mdb")
end sub
'使用SQL語句
private sub command_click()
'1創建表
'sqlstr="create table " & 表名 & "(欄位1 text,欄位2 text)" 'SQL語句
'查詢
'sqlstr="select * from 表名" 'SQL語句
db.execute sqlstr '執行SQL語句
end sub
㈤ vb 連sql,其中資料庫里的function函數怎麼調用
若optionbutton為數組控制項,opt(0 - 26)
private sub opt_click(index as integer)
dim sql as string
sql ="select * from tb "
if index<opt.ubound then
sql =sql &" where dbo. f_GetPy(sname) ='" & opt(index).caption & "'"
endif
這樣得到的是一個sql句,
你用這個SQL句查詢資料庫即可。
㈥ VB中如何運用SQL查詢語句
通過部件adbc部件,可以直接連庫,一般我通過adbc部件生成sql連接字元串,然後新建conn對象,連接資料庫
set conn=Server.Create("Adodb.Connection")
conn.Open "連接字元串"
再新建set rs=Server.Create("Adodb.RecordSet")
然後通過執行sql語句,把取得的記錄集存到rs對象中,以便調用
rs.Open (sql,conn,3,3,-1)
open函數(或者叫方法)第一個參數是要執行的sql語句,第二個參數是操作哪個資料庫,根據connection對象確定資料庫,第三第四第五個參數是表示通過什麼類型的游標,應用什麼鎖,最後一個忘了,不過默認是-1,不用管,不重要
如果不需要返回記錄集的話,比如update ,insert 可以通過資料庫連接對象的方法直接執行sql語句
conn.Execute(sql)
就可以執行了
㈦ 如何在VB中調用並運行SQL的儲存過程
我給你兩種簡單的方法:
1.
過程
CREATE PROCEDURE cyPFindWaitExecSO
----按貨品編碼查出沒有執行銷售訂單(不包括 CANCEL 作廢, stoped 中止)
@GOODSCODE VARCHAR(100)
AS
SELECT SO.WDATE,so.BILLCODE,a.QTY,a.EXEQTY,a.QTY-a.EXEQTY WaitExec,c.CLIENTNO,a.USERDEF1
FROM
(SELECT * FROM S_ORDERd WHERE EXEQTY< qty AND STOPED=0 AND canceled=0 AND GOODSID=
(SELECT GOODSID FROM GOODS g WHERE CODE = @GOODSCODE))AS a
LEFT JOIN S_ORDER so ON so.BILLID= A.BILLID
LEFT JOIN CLIENT c ON c.CLIENTID=so.CLIENTID
調用
cyPFindWaitExecSO是一個查詢存儲過程, GOODSCODE 是一個參數
Tsql = "exec cyPFindWaitExecSO '" & goodscode & "'"
Rs.Open Tsql, DBcn1
cyPFindWaitExecSO是一個查詢存儲過程, GOODSCODE 是一個參數
2. 過程
CREATE PROC ConfirmIDcardUsering
@card_id NVARCHAR(16),
@emp_id NVARCHAR(12),
@outStr NVARCHAR(50) OUTPUT
AS
IF EXISTS(SELECT Etime FROM KQID k WHERE k.card_id=@card_id AND etime IS NULL)
SET @outStr = '卡在正常使用中'
ELSE if exists(SELECT Etime FROM KQID k WHERE k.emp_id= @emp_id AND etime IS NULL)
SET @outStr = '該員工已有卡在用'
else
SET @outStr= ''
GO
調用:
Set Cmd = New ADODB.Command
With Cmd
.ActiveConnection = dbcn '數據連接字元串
.CommandType = 4
.CommandText = "ConfirmIDcardUsering" '過程名'
.Parameters.Item("@card_id").Value = Card_id '參數一'
.Parameters.Item("@emp_id").Value = emp_id '參數二'
.Execute
TestS = .Parameters.Item("@outStr").Value '反回的函數'
End With
Set Cmd = Nothing
㈧ vb6.0如何調用SQL資料庫
在窗體上加一個adodc 控制項,然後屬性,可以手工設置資料庫的類型及一些參數(如:用戶名,口令),設置好後,點測試連接,會有提示成功與否。當然,你得會一些sql 語法。
㈨ VB中調用SQL語句的問題
改成這樣就可以了 ,你掉了單引號
ssql = "insert into login(UserName,PassWord) values ('" & TxtUserName.Text & "','" & TxtPW.Text & "')"
PassWord這個詞是 access 的關鍵字,你在Login中 將它改為UserPassWord,再把程序中的PassWord改為UserPassWord , 就可以了