dephi连接方法:
procedure TloginForm.FormCreate(Sender: TObject);
var
currentPath,str,path:String;
begin
path:=ExtractFilePath(Application.ExeName );
currentPath:=concat(path,'HomeInfoSystem.mdb');
str:='Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;';
str:=concat(str,'Data Source=',currentpath);
ADOConnection.ConnectionString:=str;
ADOTable.Connection:=ADOConnection;
ADOTable.TableName:='成员列表';
ADOTable.Active:=True; ;
ADOTable.Open ;
end;
vb连接方法1(ADO):
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
Public Sub OpenDBConn(ByVal strPath As String)
Set conn = New ADODB.Connection
conn.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Persist Security Info=False;" & _
"Data Source = " & strPath & "/your_db.mdb"
conn.Open
End Sub
Private Sub Form_Load()
OpenDBConn (App.Path)
Set rs = conn.Execute("select * from userInfo")
End Sub
(2)
'用此方法操作数据库需引用DOA对象
Dim dbs As Database
Dim rst As Recordset
Dim strName As String
Dim strPwd As String
Private Sub Form_Load()
Set dbs = OpenDatabase(App.Path & "/db.mdb")
Set rst = dbs.OpenRecordset("user")
addNewX
End Sub
Private Sub addNewX()
strName = InputBox("请输入姓名;", "对话:", "")
strPwd = InputBox("请输入密码;", "对话:", "")
If strName <> "" And strPwd <> "" Then
addCord rst, strName, strPwd
Else
MsgBox "姓名或密码不能为空"
End If
End Sub
Private Sub addCord(rs As Recordset, name As String, pwd As String)
With rs
.AddNew
!name = name
!pwd = pwd
.Update
End With
End Sub
分享到:
相关推荐
NULL 博文链接:https://devintan110.iteye.com/blog/725983
一个手机上的sqlite数据库的动态链接库
最全面,最容易读懂的vc++动态链接数据库dll开发,三天教会你dll开发
帮助学习用jdbc连接数据库,使大家更快的成为java高手
SpringBoot的多数据源的动态切换项目源代码,适用于不同的用户操作不同的数据库,但是其对应的repository是一样的,可以进行http请求的动态数据源切换
这个例子为大家演示了动态链接数据库的方法
1.只需引用头文件中的函数,就可以实现常用的数据库操作,DLL中使用的是ADO连接方式,使用时无需关注ADO的这些细节,也没必要重新引用ADO的动态链接库 2.充分利用C++的函数重载功能,读取字段采用GetRsField函数,...
摘要:Delphi源码,数据库应用,动态链接 Delphi动态链接数据库实例,一个有利于学习的Delphi动态链接数据库实例,仅供初学者参考下载。Delphi源码尽在源码爱好者。
主要介绍了java自定义动态链接数据库示例,需要的朋友可以参考下
此软件介绍如何动态指定水晶报表数据库。
springboot数据库连接动态切换源代码。
财税实务:教你如何操作Excel动态链接外部数据库.pdf
支持动态链接库的系统数据库查询DLL,目前支持ORACLE
主要介绍MapGuide与外部数据库实现动态的连接。
基于ADO动态链接库的数据库应用程序--通讯录
trs动态链接库 放在jre/bin下 32位的,如果数据库为64位的可修改Maven配置即可
以动态链接库的形式加载到主程序中,打开数据库,对数据进行查询,删除,编辑等操作,可将数据存入数据库的指定表中。
springboot整合redis动态切换每个数据库,
完成Excel动态链接外部数据库.docx
方法1:在需要连接其他数据库的地方,使用Db::connect()方法动态连接数据库,方法参数为数据库配置的数组或字符串例如: 字符串参数: Db::connect('mysql://root:1234@127.0.0.1:3306/thinkphp#utf8'); 配置数组...