private sub 插入_click()
dim 鏈結集 as new adodb.connection '定義 資料鏈結 物件,儲存 連線資料庫資訊;請先新增ado引用
dim 伺服器名 as string '定義 字串變數
dim 資料庫名 as string
dim 登入名 as string
dim 密碼 as string
dim 鏈結條件 as string
dim 新增資料 as string
dim yh as string
dim mm as string
伺服器名 = "gsfsr"
資料庫名 = "sy_data"
登入名 = "sa"
密碼 = "sa2011"
鏈結條件 = "provider=sqloledb;server=" & 伺服器名 & ";database=" & 資料庫名 & ";uid=" & 登入名 & ";pwd=" & 密碼 & ";" '定義資料庫鏈結字串
yh = me.使用者名稱.value
mm = me.密碼.value
新增資料 = "insert into 使用者表(使用者名稱,密碼) values('" & yh & "','" & mm & "')" '定義sql 查詢命令字串
鏈結集.open 鏈結條件 '與資料庫建立連線
鏈結集.execute 新增資料
鏈結集.close
msgbox " 資料新增完畢 ! ", vbexclamation, " 恭喜"
end sub
在ACCESS中用SQL匯入匯出資料
hkey local machine software microsofe jet 4.0 isam formats 下有多種格式,在access中可以使用這些格式匯入匯出 select into filname from text database e developer filname.txt ...
SQL中新增資料
方法一 直接匯入 右鍵單擊你要匯入表的資料庫 任務 匯入資料 方法二 create database school 建立資料庫 use school create table student 建立資料庫裡的表 id char 8 primary key,主鍵 name char 20 not nul...
asp連線sql資料庫,access資料庫字串
asp連線sqlserver資料庫字串 set connsql server.createobject adodb.connection strsql provider sqloledb.1 password y ht1986 persist security info true user id s...