试试这样:
begin
with ADOStoredProc do
begin
ExecProc;
edit1.text:=parameters.parambyname('@thedate').value;
end;
end;
begin
with ADOStoredProc do
begin
ExecProc;
edit1.text:=parameters.parambyname('@thedate').value;
end;
end;
调试欢乐多
1、用 ADO OLE DB provider for SQL server 连接时,
使用 ExecPorc; 正常。
使用 Open;会出错:CommandText dose not return a result set.
2、用 ADO OLE DB provider for ODBC 连接时,
使用 ExecPorc, Open; 都出错;[Microsoft][ODBC SQL Server Driver]没有执行可选特性