请教ado问题。

Question

用ado可不可以新建一个数据库或一张表啊，应该怎么做？谢谢

Answer 1

答：ADO是一个连接数据库的工具，你需要自己在SQL SERVER等数据库中自己建立数据库与表。
例：
Public Function ExecuteSQL(sql As String) As ADODB.Recordset
Dim cn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim msg As String
On Error GoTo executesql_error
Set cn = New ADODB.Connection
cn.Open "Driver={SQL Server};Server=你的服务器;Uid=sa;Pwd=;database=你的数据库"
Set rst = New ADODB.Recordset
rst.Open Trim$(sql), cn, adOpenKeyset, adLockOptimistic
Set ExecuteSQL = rst
executesql_exit:
Set rst = Nothing
Set cn = Nothing
Exit Function
executesql_error:
msg = "错误原因：" & Err.Description
Resume executesql_exit
End Function

Answer 2

ADO是用来连接数据库并处理记录与数据的。要建立表与数据库那是数据库管理软件的事情，你要将ADO与数据库管理系统分清关系。