读书人

好手们,SOS

发布时间: 2011-12-26 23:09:58 作者: rapoo

高手们,SOS!
请高手们看看这一段代码有问题吗
怎么老是提示:未找到可安装的ISAM

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim conn As New OleDb.OleDbConnection( "Provider=Microsoft Jet 4.0 OLE DB Provider;uid= " ";pwd= " " ")
conn.Open() '打开连接
'从数据库中修改指定记录
Dim comm As New OleDb.OleDbCommand( "CREATE DATABASE GUEST ", conn) '数据源执行的SQL语句
comm.ExecuteNonQuery() '执行-创建数据
conn.Close() '关闭连接
MsgBox( "成功 ")
Catch a As Exception
MsgBox(a.Message)
End Try

End Sub

[解决办法]
连接字符串
Provider=Microsoft.Jet.OLEDB.4.0; Data Source=d:\Northwind.mdb;User ID=Admin;Password=;


*****************************************************************************
欢迎使用CSDN论坛专用阅读器 : CSDN Reader(附全部源代码)

最新版本:20070212

http://www.cnblogs.com/feiyun0112/archive/2006/09/20/509783.html
[解决办法]
http://support.microsoft.com/kb/318161

读书人网 >VB Dotnet

热点推荐