TA貢獻1864條經驗 獲得超2個贊
這是一個SQL語句，里面可以填寫很多中，增刪查改都可以，如：strsql="select * from 表 where 列名=‘“& 查找的相對應的列的條件 &”’" 如：strsql="delete from 表名 where 列名=‘“& 滿足刪除的條件 &”’" 等
TA貢獻1862條經驗 獲得超6個贊
Private Sub CommandButton1_Click()Dim DBConnDim connStr'建立數據庫連接對象Set DBConn = CreateObject("ADODB.Connection")'設定連接用信息(driver dsn uid pwd dbalias都要替換成正確的)connStr = "DRIVER ={XXXX};DSN = XXXX;UID=XXXX;PWD=XXXX;DBALIAS=XXXXX;"'使用客戶端游標DBConn.cursorlocation = 3'連接DBDBConn.Open connStr '建立結果集對象Dim rslt'建立SQL語句Dim strSql As StringconnStr = "Select count(*) from TestTable;" '這個是演示用的 具體使用要替換成具體語句'通過數據庫連接對象執行sql并返回結果集Set rslt = DBConn.Execute(sql) End Sub |
以上就是一個最基礎的且不帶封裝和報錯的DB連接+執行sql的應用
舉報