本函数用于构成数据库连接字,数据库连接采用的是ado.connection
完整的连接字为:
Provider=OraOLEDB.Oracle.1;Password=80327;Persist Security Info=True;User ID=Zium;Data Source=Zium
问题:连接不能正常打开 function gfunDBconnTrue(sUsername:string;sPassword:string;sSource:string):boolean;
var
connTest: TADOConnection;
adodbSet:TADODataSet;
sTemp:string;
begin
Result:=True;
sTemp:='Provider=OraOLEDB.Oracle.1;Password='+sPassword;
sTemp:=sTemp+';Persist Security Info=True;User ID='+sUsername;
sTemp:=sTemp+';Data Source='+sSource;
try
connTest.Open;
except
application.MessageBox('bug','DB Error',MB_OK);
Result:=False;
end;
connTest.Close;
connTest.Free;
end;
完整的连接字为:
Provider=OraOLEDB.Oracle.1;Password=80327;Persist Security Info=True;User ID=Zium;Data Source=Zium
问题:连接不能正常打开 function gfunDBconnTrue(sUsername:string;sPassword:string;sSource:string):boolean;
var
connTest: TADOConnection;
adodbSet:TADODataSet;
sTemp:string;
begin
Result:=True;
sTemp:='Provider=OraOLEDB.Oracle.1;Password='+sPassword;
sTemp:=sTemp+';Persist Security Info=True;User ID='+sUsername;
sTemp:=sTemp+';Data Source='+sSource;
try
connTest.Open;
except
application.MessageBox('bug','DB Error',MB_OK);
Result:=False;
end;
connTest.Close;
connTest.Free;
end;
解决方案 »
- 请问这是什么格式的图片?
- 非常紧急的问题,在线等!!!!
- 高分求助:为什么98下TAPI.LineGetID可以取得wave/out的Modem设备号,在2000下就不行了?
- 调用faoxmail时候,如何把邮件地址直接传入到foxmail邮件地址栏中,outlook可以实现。。
- DELPHI研究和 学习。 大家发放资料的地方2796202 初学者的家,请大家推广该群
- 在DELPHI中怎样处理多表更新的问题?
- 用MSHTML 自动填写的问题,用现金奖励!!!
- 求职~~~~~~~~
- 開發方法﹐高手給點思路﹗
- ADO错误,这是否是一个Delphi ADO控件Bug(高手请帮忙)
- 如何编写PING命令的功能??
- 在TQUERY中怎么得到一个记录的指定列的值?
简直晕倒,这也没写那也没写怎么搞打得开嘛?
conntest.connectionstring:=stemp;
Result:=True;
sTemp:='Provider=OraOLEDB.Oracle.1;Password='+sPassword;
sTemp:=sTemp+';Persist Security Info=True;User ID='+sUsername;
sTemp:=sTemp+';Data Source='+sSource;
conntest.connectionstring:=stemp;
好像 conntest的没有create
改一下: connTest := TADOConnection.Create(nil);
conntest.connectionstring:=stemp;
try
connTest.Open;
except
application.MessageBox('bug','DB Error',MB_OK);
Result:=False;
end;
connTest.Close;
connTest.Free;
中的nil是什么组件呀?