怎样设置TDATABASE 和TQUERY

max_welcome 2003-09-11 01:29:44

我想访问 192.168.0.41上的SQL SERVER数据库的MyLogdatabase数据库，请问应该
怎样设置TDATABASE 和TQUERY 的属性才能访问阿？？？

...全文

35 2 打赏收藏转发到动态举报

写回复

2 条回复

切换为时间正序

请发表友善的回复…

发表回复

haoguozhong 2003-09-11

打赏
举报

回复

用ADO就方便多了！

Zengqf_W 2003-09-11

打赏
举报

回复

为什么用TDATABASE而不用Ado的控件呢

BDE控件TDATABASE的参数设置.txt

给初学delphi7的同学引个路使用了数据库的基本操作 access密码设置及新的报表设计工具设计

用VB6编写的代码 Private Sub Command2_Click() strconnect = "provider=SQLOLEDB;Persist Security Info=true;User Id='" & Tname & "';PassWord='" & Tpwd & "'; Initial Catalog=master;Data Source='" & Tserver & "'" If Conn.State = 1 Then Conn.Close Conn.Open strconnect 'GetSq Now sql = "select * from sysdatabases where name = '" & Tdatabase & "'" If rst.State = 1 Then rst.Close rst.CursorLocation = adUseClient rst.Open sql, Conn, adOpenStatic, adLockReadOnly 'If rst.EOF = True Then 'MsgBox "修改前的数据不存在，请检查！", vbInformation, "检查数据库是否存在" 'Exit Sub 'End If If rst.EOF = False Then Conn.Execute "exec sp_rename '" & Tdatabase & "','" & Tdatabase1 & "','database'" Else Conn.Execute "exec sp_rename '" & Tdatabase1 & "','" & Tdatabase & "','database'" End If 'MsgBox "执行完毕", vbOKOnly Unload Me End Sub

一个方便查看ACCESS数据库的小工具，无需安装office，无需安装access即可查看数据库数据。

5,386

社区成员

262,729

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章