vb查詢sql資料庫
"SELECT sno,sco FROM sco WHERE sno='" & text1.text & "'"
因為現在不弄VB6了,所以具體怎麼連接的代碼我忘了,大概就是如果得到的結果RecordSet是空的,即Bof And Eof,則用戶名錯誤,否則如果規定了用戶名不可重復,就有且僅有1條記錄,再比較其中的sco與Text2.Text是否相等,是則正確通過,否則密碼錯誤。
『貳』 VB6.0 如何連接SQL 資料庫
你在SQL SERVER中新建一個資料庫,然後將這個資料庫生成腳本文件,根據情況修改後轉存為MASTER下的一個存儲過程。至於資料庫名和數據文件路徑可以做成參數傳入,然後在VB中用連到MASTER後執行這個存儲過程。
用VB與建立的SQL資料庫連接
1.使用ODBC DSN連接字元串
DSN=mySystemDSN;Uid=myUsername;Pwd=myPassword
----------------------------------------------
2.使用無ODBC DSN的連接字元串
(1)標准安全性
Driver={SQL Server};Server=MyServerName;DataBase=myDatabaseName; _
Uid=myUsername;Pwd=myPassword
------------------------------------------------
(2)信任連接(分兩種)
1)連接字元串1
Driver={SQL Server};Server=MyServerName;DataBase=myDatabaseName;Uid=;Pwd=;
2)連接字元串2
Driver={SQL Server};Server=MyServerName;DataBase=myDatabaseName;Trusted_Connection=yes
---------------------------------------------------------------------------
(3)連接本地SQL SERVER
Driver={SQL Server};Server=(local);DataBase=myDatabaseName; _
Uid=myUsername;Pwd=myPassword
-------------------------------------------------------------
(4)連接遠程SQL SERVER
Driver={SQL Server};Server=xxx.xxx.xxx.xxx; _
Address=xxx.xxx.xxx.xxx,1433; _
Network=DBMMSOCN;DataBase=myDatabaseName; _
Uid=myUsername;Pwd=myPassword
-------------------------------------------------------
3.使用OLEDB PROVIDER FOR SQL SERVER的連接字元串
(1)標准安全性
Provider=SQLOLEDB.1; _
Password=myPassword; _
User ID=myUsername; _
Initial Catalog=myDatabaseName; _
Data Source=MyServerName
-------------------------------------------
(2)信任連接
Provider=SQLOLEDB.1; _
Initial Catalog=myDatabaseName; _
Data Source=MyServerName; _
Integrated Security=SSPI
--------------------------------------
(3)連接到命名實例
Provider=SQLOLEDB.1; _
Initial Catalog=myDatabaseName; _
Data Source=myServerName\myInstanceName; _
Password=myPassword; _
User ID=myUsername
--------------------------------------
(4)連接到本地SQL SERVER
Provider=SQLOLEDB.1; _
Password=myPassword; _
User ID=myUsername; _
Initial Catalog=myDatabaseName; _
Data Source=(local)
-----------------------------------------
(5)連接到遠程SQL SERVER
Provider=SQLOLEDB.1; _
Netwprk Library=DBMMSOCN; _
Data Source=xxx.xxx.xxx.xxx,1433; _
Password=myPassword; _
User ID=myUsername; _
Initial Catalog=myDatabaseName;
『叄』 VB怎麼SQL資料庫查詢問題
Private Sub Command4_Click() '圖書查詢按鈕觸發事件
If (Text1.Text = "") And (Text2.Text = "") Then
MsgBox("圖書名稱或主編不能同時為空,二者請選一個輸入進行查詢", , "系統提示")
Exit Sub
End If
Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim Strcon As String
Dim strSQL As String
'這里無需使用那麼多的變數,占內存。
Strcon = "Provider=Microsoft.Jet.OLEDB.4.0;"
Strcon = Strcon & "Data Source=E:\vb\圖書書架.mdb;"
Strcon =Strcon & "Jet OLEDB:Database Password="
conn.Open Strcon
'查詢連接字元串,你寫的實在是太...
strSQL="select * from 圖書登記 where 圖書名稱='" & Trim(Text1) & "' and 主編='" & Trim(Text2) & "'"
rs.open strSQL,conn
If rs.EOF and rs.BOF then
msgbox "查無此書"
Text1=""
Text2=""
Text1.Setfource
else
'你的那個Adodc1出現的實在是有些莫名其妙.
msgbox "查到了"
'在Text3中顯示查詢到的書籍的ID號,即欄位ID的值,以下同理。
Text3=rs.Fields("ID")
Text4=rs.fields("出版社")
Text5=rs.Fields("定價")
end if
'關閉游標
rs.close
'釋放游標所佔內存
set rs=nothing
'關閉連接對象
conn.close
'釋放連接對象所佔內存
set conn=nothing
End Sub
'補充:
'資料庫查詢可以用中文表頭,但是最好還是使用英文的。
『肆』 vb如何連接sql資料庫
1、打開代碼窗口,添加引用:Imports System.Data.SqlClient。
『伍』 VB.NET 查詢SQL資料庫
sql伺服器上需要有裝oracle的client端(或者類似驅動)
2. 在sqlserver的企業管理器里建一個鏈接伺服器(DBlink)具體方法可以查一下幫助
3.
insert into sqlserver_table
select * from openquery(你建的dblink名稱,'oracle的select語句')
openquery的語法可以查幫助出來
注意select語法是跟oracle的,要用引號括起來當字元串,ms要大寫
很久之前做過的,希望能幫上,試試看吧:)
另外,虛機團上產品團購,超級便宜
匿名 ??<span class="tm">7-21 02:14</span>
</p>
<div class="b bt2"><div class="bt bg1 ft"><img alt="其他答案" height="16" src="/static/img/ico2.gif" width="16"/>其他答案</div></div>
<p class="ft p1">1. sql伺服器上需要有裝oracle的client端(或者類似驅動)
2. 在sqlserver的企業管理器里建一個鏈接伺服器(DBlink)具體方法可以查一下幫助
3.
insert into sqlserver_table
select * from openquery(你建的dblink名稱,'oracle的select語句')
openquery的語法可以查幫助出來
注意select語法是跟oracle的,要用引號括起來當字元串,ms要大寫
很久之前做過的,希望能幫上,試試看吧:)
『陸』 VB中的SQL查詢語句
select
count(icuo)
from
sheet1
where
icuo='0'//這才是統計出為0的個數然後再select
ID
from
sheet1
where
icuo='0'//這是列出為0的全部數據ID
『柒』 vb.net 中如何使用SQL語句查詢資料庫
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
『捌』 如何在VB中通過兩個文本框查詢SQL資料庫
核心還是寫sql語句把,比如創建的表(信息表)結構為
ID,時間,出發站,到達站對應的sql語句可以寫為
"select
*
from
信息表
where
出發站=
&
text1.text
&
and
到達站=
&
text2.text
&
"然後使用ADO建立資料庫連接,執行這個sql語句就好了,可以將查詢到的記錄集綁定到datagrid上,會自動顯示的,只不過這樣顯示效果一般。
『玖』 VB怎麼連接 SQL 資料庫
一個簡單的方法:
首先,建立程序公共模塊輸入以下代碼:
Public conn As New ADODB.Connection
'全局變數 rst 指針
Public rst As New ADODB.Recordset
'全局調用函數 打開資料庫
Public Function openconn()
conn.ConnectionString = "連接信息"
'此連接信息最簡單的生成辦法:
'在任意窗口下建立一新ADODC控制項
'選擇控制項屬性,通用頁,使用連接字元串,生成(U)
'利用該向導生成出字元串,然後將該字元串復制到"連接信息"中即可
conn.Open
End Function
'全局調用函數 關閉資料庫
Public Function closeconn()
If conn.State = 1 Then
conn.Close
Set conn = Nothing
End If
End Function
然後在窗體文件中可以使用的函數:
打開資料庫:openconn
注意:此函數為自定義函數,無參數,定義在公共模塊中!
建立數據表連接:Set rst = conn.Execute("select * from 數據表名")
如做登陸頁可以這樣判斷用戶名密碼:
Text1.Text = RTrim(rst.Fields("id")) And Text2.Text = RTrim(rst.Fields("password"))
注:其中Text1.Text為輸入用戶名TextBOX Text2.Text為輸入密碼TextBOX
數據表中 id 為保存用戶名 password 為保存密碼!此方法為非加密方法!
關閉資料庫函數:
closeconn
Set rst = Nothing
注:此兩行,必須在打開資料庫的情況下使用!並且每打開一次資料庫後必須先使用此兩句將資料庫關閉後才可打開另一資料庫表文件!!!!!否則程序報錯終止!
添加新數據函數
rst.AddNew
rst("欄位名1") = Text1.Text
rst("欄位名2") = Text2.Text
rst.Update
刪除數據函數
rst.Delete
注:使用此函數前,必須保證資料庫指針函數rst指向需刪除數據,移動rst指針可以使用函數:rst.MoveNext或rst.MoveLast
更新數據函數
rst.Open "update 數據表名 set 欄位1='" + Text1.Text + "',欄位2='" + Text2.Text + "' where id='" + Text3.Text + "'", conn, 1, 3
注,其中 where id = 為更新特定數據表的查找!
如果熟悉SQL語句,還可編寫出其他方式的查找,這里就不多做介紹了!
『拾』 如何在vb中通過兩個文本框查詢sql資料庫
核心還是寫sql語句把,比如創建的表(信息表)結構為
ID,時間,出發站,到達站
對應的sql語句可以寫為
"select * from 信息表 where 出發站='" & text1.text & "' and 到達站='" & text2.text & "'"
然後使用ADO建立資料庫連接,執行這個sql語句就好了,可以將查詢到的記錄集綁定到datagrid上,會自動顯示的,只不過這樣顯示效果一般。