收录日期:2018/12/11 02:10:51 时间:2016/05/18 03:14:24 标签:数据库(包含打印,安装,报表)
一个程序,用access2000作数据库,现在给数据库加了个密码,密码是yuan,联接时没报错,而且能搜索,可在datagrid控件中,会报错.不知道是不是联接的问题,代码如下:

Public Sub main()
Dim strConn As String

  strConn = "Data Source=" & App.Path & "\db1.mdb;" & _
            "Jet OLEDB:Database Password=yuan"
  db1.Provider = "Microsoft.Jet.OLEDB.4.0"
  db1.Open ConnectionString:=strConn

  
  frmMain.Show
End Sub


Private Sub cmdshow_Click()
Set dgresult.DataSource = db1.Execute("select * from book")
End Sub


急救,请各位达人指点!





MSDN里面有说需要的参数的,至少你就没有用户名




cn.ConnectionString = "provider= Microsoft.Jet.OLEDB.4.0;data Source=" & App.Path & "\data.mdb" & ";Jet OLEDB:Database Password=yuan"
    cn.Open

为什么这样的程序都运行不过来? 请问:bcb访问ACCESS数据库的ADO连接字符串CONNECTIONSTRING怎么写?? 在线等待,否则老板抄我了!!!数据窗口的排列!!! 关于学校的数据库系统,大家都来讨论一下好吗^_^ 在线求救! 菜鸟问题:IMAGE字段可以存最大容量是多少的图片? 谁有无组件上传的代码和详细讲解? 大家好!我有关于win2000advance serve的问题 请问各位高手是否作过将InterBase数据库转换到Sql Server数据库,如何做? 怎么在一个目录下得到所有的文件名?///不用控件 100分求救,怎样改变windows的光标? 截取工具软件 寻字符串操作函数! 请问如果要获得区域网内其他机器的本地文件夹目录信息,该如何实现? 为什么不要应届毕业生 CMP里面怎样拿到详细的SQLException信息 如何设置串口通讯的第九位(校验位)为固定值,如0或1, 国内在的英文影印版吗? 大家给点意见,关于TurboLinux7的一些问题? 请教,如何判断打印机是否缺纸? 球迷购票问题(100分,俺要没分了) 近日小弟学一个VC入门教材遇到两个问题,请大家指教,谢谢! 征求连接 求助 大家帮帮忙 急呀~ 几个小问题,来拿分吧 如何通过本机在另一computer上创建快捷方式(程序方法)? 我等到九点!很简单的问题! 征求连接 如何求多边形外接圆的半径?急! 关于C++BUILDER学习的问题!