procedure TfrmDTMfirst.DataModuleCreate(Sender: TObject);
begin
ADOConnofficeOA.Connected :=false;
ADOConnofficeOA.ConnectionString := 'Provider=SQLOLEDB.1;Password=996232;Persist Security Info=True;User ID=sa;Initial Catalog=officOA;Data Source=ZHOURY;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Remote Server=ZHOURY;Use Encryption for Data=False;Tag with column collation when possible=False';
try
ADOConnofficeOA.Open;
ADOConnofficeOA.KeepConnection := true;
except
on E:exception do
begin
application.MessageBox('连接数据库出错,请与系统管理员联系!','错误',MB_OK);
self.close;
Application.Terminate;
end;
end;
end;
是不是我的ConnectionString 写的不对,为什么我在局哉网的98系统上运行时找不到机器名为zhoury系统为windows2000server上装的SQL2000数据啊!
求高手帮忙!谢谢了!
begin
ADOConnofficeOA.Connected :=false;
ADOConnofficeOA.ConnectionString := 'Provider=SQLOLEDB.1;Password=996232;Persist Security Info=True;User ID=sa;Initial Catalog=officOA;Data Source=ZHOURY;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Remote Server=ZHOURY;Use Encryption for Data=False;Tag with column collation when possible=False';
try
ADOConnofficeOA.Open;
ADOConnofficeOA.KeepConnection := true;
except
on E:exception do
begin
application.MessageBox('连接数据库出错,请与系统管理员联系!','错误',MB_OK);
self.close;
Application.Terminate;
end;
end;
end;
是不是我的ConnectionString 写的不对,为什么我在局哉网的98系统上运行时找不到机器名为zhoury系统为windows2000server上装的SQL2000数据啊!
求高手帮忙!谢谢了!
解决方案 »
- 如何在桌面画一个圆圈,自左向右移动?
- 如何在程序中显示GIF动画啊
- 关于tlist的问题(很菜,请帮帮忙)
- 在如何在模态窗口(showmodal)中动态删除动态生成的控件?
- 我爸说不争钱不能编软件,编免费的跟我急!!!!气得上,散分
- 对消息及窗口函数的理解
- 不知为什么贴子被删了一大半,信誉分大减,也没有说明被删除的原因,已结的贴子也被删除了,这是什么天下
- 紧急求助delphi5和sql server中的关于word2000文件的有关问题(在线等待)
- 急!请问有没有,容纳控件,但容不下时, 自动出现滚动条的控件?
- 急急急 请问如何建立窗体级的变量
- 请问TBitBtn按钮设置了ModelResult,但是当按下按钮时,我不想让它将对话框退出,怎么做?
- 我在用Delphi制作ISAPI网页时,使用D6自带的数据库可以在网页上看到数据,但用其他的数据却看不到数据只有一个框架,并告知数据出错。请
build出连接字符串,这样你再试试
大不了装个SQL SERVER 的客户端。