一、我在WebModule中添加一个DataBase与数据库连接,在设计的时候可以Open(不需要输入用户名,密码),但在Dll中执行就有错误。对数据库操作就不能完成,请问是什么原因?或者如何找到错误类型?
procedure TWebModule1.WebModule1WebActionItem5Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
Page : TStringList;
begin
Page := TStringList.Create;
Page.Add('<HTML>');
Page.Add('<Body>');
try
DataBase1.Open;
except
On EODBCError do
Page.Add(inttostr(GetLastError));
end;
Page.Add('Finish<p>');
Page.Add('</BODY></HTML>');
Response.Content := Page.Text;
Page.Free;
end;
二、QueryTableProducer可以和Query连接,直接生成表格,但能否与ADO连接生成表格?
procedure TWebModule1.WebModule1WebActionItem5Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
Page : TStringList;
begin
Page := TStringList.Create;
Page.Add('<HTML>');
Page.Add('<Body>');
try
DataBase1.Open;
except
On EODBCError do
Page.Add(inttostr(GetLastError));
end;
Page.Add('Finish<p>');
Page.Add('</BODY></HTML>');
Response.Content := Page.Text;
Page.Free;
end;
二、QueryTableProducer可以和Query连接,直接生成表格,但能否与ADO连接生成表格?
解决方案 »
- 关于地址对应城市或区/县的设计
- 无题,没事发发牢骚
- delphi 中是否有类似memset的函数
- 寻找能下载整个网站的软件
- 控件Ehlib3安装时提示: File not found: 'DBSumLst.dcu',请问这是为什么??
- 二进制的DFM文件如何用代码将其转换成纯文本文件?
- 疯狂散分,第六期<电脑迷>光盘的主程序用delphi作的,如何实现里面的若干效果,在线等待,
- 如何启动控制面板和屏幕保护???
- Delphi中用什么格式的表格可以导出直方图?
- THeaderControl 怎么用?
- 小弟在用memo做一个类似dos控制台的东西,请问怎样才能使光标一直保持在文本的最后
- image控件中的图像如何拷贝?
问题2:不能
AutoSessionName = True
PrivateDir = 'E:\WEBSERV'
Left = 128
Top = 136
end
object Database1: TDatabase
AliasName = 'sms_db'
DatabaseName = 'local'
LoginPrompt = False
Params.Strings = (
'user name=sa'
'password=jia1305')
ReadOnly = True
SessionName = 'Session1_2'
Left = 200
Top = 128
end
中国Delphi大联盟的朋友支持你!
中国Delphi大联盟的朋友支持你!