看板 Visual_Basic 關於我們 聯絡資訊
方法一: Set conn = CreateObject("ADODB.Connection") Set cmd = CreateObject("ADODB.Command") conn.open "log", "test" , "test" Set cmd.ActiveConnection = cn cmd.CommandType = 2 'Open Table cmd.CommandText = "table" Set rs = cmd.Execute() 方法二: Set conn = CreateObject("ADODB.Connection") Set cmd = CreateObject("ADODB.Command") conn.open "log", "test" , "test" Set cmd.ActiveConnection = cn cmd.CommandType = 1 '可以省略這行 cmd.CommandText = "select * from table" '下查詢語法 Set rs = cmd.Execute() 方法三: Set conn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") conn.open "log", "test" , "test" Set rs.ActiveConnection = cn rs.Open "select * from table" '下查詢語法 方法四: Set conn = CreateObject("ADODB.Connection") Set rs = CreateObject("ADODB.Recordset") conn.open "log", "test" , "test" rs.Open "select * from table", conn '下查詢語法 方法五: Set conn = CreateObject("ADODB.Connection") conn.open "log", "test" , "test" Set rs = conn.Execute("select * from table") '下查詢語法 -- ▃▅▇▆▄ ▆▂▃ ` 逝去感如何能留住,半點遺留殊不易,██▅▇▄▃ ▇▃▂" . █████████▃i ▁▄▇ 更多悽悽慘慘的遭遇………██▆▃ █▅▆▃ˍ▄* ▂█▄▇▅▂. 我不知道,王~八~蛋~~! ▂▆███ █▄▃ 。fumizuki。Check。 -- ※ 發信站: 批踢踢實業坊(ptt.cc) ◆ From: 210.58.156.20