vbnet查詢資料庫
dim
myselectquery
as
string
=
"select
*
from
表1
where
姓名='小強'"
dim
mycommand
as
new
sqlcommand
(myselectquery,
conn)
'建立一個command控制項,conn是你的sqlconnection對象
conn.open()'打開數據連接
dim
myreader
as
sqldatareader'定義一個reader用來讀數據
myreader
=
mycommand.executereader()'運行你的查詢,結果到myreader
if
myreader.read()
then
'如果查到了數據
msgbox(myreader.getstring(0))
'顯示第一個欄位
end
if
B. 在VB怎麼查詢資料庫中的數據啊!
1.一個簡單的查詢的例子:
'*定義一個連接
Dim Conn As ADODB.Connection
'*定義一個記錄集
Dim mrc As ADODB.Recordset
'*分別實例化
Set Conn = New ADODB.Connection
set mrc =New ADODB.Recordset
'*定義一個連接字元串
dim ConnectString as string
ConnectString="provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\data\資料庫名.mdb;jet oledb:database password=資料庫密碼"
'*打開連接
Conn1.Open ConnectString
'*定義游標位置
Conn1.CursorLocation = adUseClient
'*查詢記錄集(從student表中找出名子為"張三"的記錄)
mrc.open "select * from student where name='張三'",Conn, adOpenKeyset, adLockOptimistic
'*現在你已經得到了你想要查詢的記錄集了,那就是mrc
'*你可以把此記錄集與DataGrid榜定,用datagrid顯示你查詢的記錄
set me.datagrid.datasource=mrc
C. 如何用vb.net查詢、添加、刪除、修改資料庫(需要很詳細的代碼)
sQueryString是SQL(增刪查改)語句
public
Boolean
ExecSQL(string
sQueryString)
{
SqlConnection
con
=
new
SqlConnection(ConfigurationManager.AppSettings["conStr"]);
con.Open();
SqlCommand
dbCommand
=
new
SqlCommand(sQueryString,
con);
try
{
dbCommand.ExecuteNonQuery();
con.Close();
}
catch
{
con.Close();
return
false;
}
return
true;
}
}
建立一個類,明自己取,然後調用就是了
例如:
類
BC=NEW
類();
STRING
ist="INSERT
INTO
XX(1,2,3)VALUES(A,B,C)";
BC.ExecSQL(ist);
就可以了