Three errors When connect ASE
Posted: Wed 26 May 2010 12:13
Three Errors when connect Sybase ASE
1.UniQuery1.RefreshRecord Raise 'Refresh failed. Found 0 records' When connect ASE
2.Exec 'Select * From Sysprocesses',FieldValue of Field=''
3.
Create DataBase1
Create table TableA(
ID1 varchar(10) not null,
Value1 varchar(50) null)
Create DataBase2
Create table TableB(
ID2 varchar(10) not null,
Value2 varchar(50) null)
DB: TUniConnection;
DB.DataBase:=DataBase1;
UniQuery1.Connection:= DB; UniQuery2.Connection:= DB;
Code Example:
UniQuery1.Close;
UniQuery1.SQL.Text:= 'select * from DataBase2..TableB';
UniQuery1.Open;
UniQuery2.Close;
UniQuery2.SQL.Text:= 'select * from TableA where ID1=:P_ID1';
UniQuery2.ParamByName('P_ID1').DataType:= ftString;
UniQuery2.ParamByName('P_ID1').ParamType:= ptInput;
UniQuery2.ParamByName('P_ID1').AsString:= 'A';
UniQuery2.Open; -->>raise "TableA not Found"
________
H platform
1.UniQuery1.RefreshRecord Raise 'Refresh failed. Found 0 records' When connect ASE
2.Exec 'Select * From Sysprocesses',FieldValue of Field=''
3.
Create DataBase1
Create table TableA(
ID1 varchar(10) not null,
Value1 varchar(50) null)
Create DataBase2
Create table TableB(
ID2 varchar(10) not null,
Value2 varchar(50) null)
DB: TUniConnection;
DB.DataBase:=DataBase1;
UniQuery1.Connection:= DB; UniQuery2.Connection:= DB;
Code Example:
UniQuery1.Close;
UniQuery1.SQL.Text:= 'select * from DataBase2..TableB';
UniQuery1.Open;
UniQuery2.Close;
UniQuery2.SQL.Text:= 'select * from TableA where ID1=:P_ID1';
UniQuery2.ParamByName('P_ID1').DataType:= ftString;
UniQuery2.ParamByName('P_ID1').ParamType:= ptInput;
UniQuery2.ParamByName('P_ID1').AsString:= 'A';
UniQuery2.Open; -->>raise "TableA not Found"
________
H platform