想在 isapi 中执行 cmd 语句 怎么也不能成功 问题出在哪儿?这是我的源程序 unit Unit1;interfaceuses
SysUtils, Classes, HTTPApp,shellapi;type
TWebModule1 = class(TWebModule)
procedure WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
private
{ Private declarations }
public
{ Public declarations }
end;var
WebModule1: TWebModule1;implementation{$R *.dfm}procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
ShellExecute(0, 'open', 'D:\WINDOWS\system32\cmd.exe',pchar(' /c del f:\files.txt'),nil, 1);end;end.如果编译成 cgi 在本地可以直接运行成功 删除 files.txt 通过网页访问 就不执行
SysUtils, Classes, HTTPApp,shellapi;type
TWebModule1 = class(TWebModule)
procedure WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
private
{ Private declarations }
public
{ Public declarations }
end;var
WebModule1: TWebModule1;implementation{$R *.dfm}procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
ShellExecute(0, 'open', 'D:\WINDOWS\system32\cmd.exe',pchar(' /c del f:\files.txt'),nil, 1);end;end.如果编译成 cgi 在本地可以直接运行成功 删除 files.txt 通过网页访问 就不执行
解决方案 »
- 自己分配的窗口中有必要用DefWindowProc么?
- 请教个有关时间比较的问题
- 先祝大家新春快乐,这里还有个小问题,请高手帮助。delphi+DTS
- 我想Borland自己是不用Together for Delphi的!!!
- 串口被占用如何更改串口?
- 有没有人知道 .MP 结尾的文件名,是哪个报表控件生成的
- 用table可以显示表内容,query为什么不行?!
- 看看什么地方错了,小弟初学
- 求职:程序员,工作地点:广州市
- 在处理字段为空数据时的一个问题
- 如何在word文档中读取excel表?
- [高手请入]多个QUERY查询时速度明显减慢,尤其是在98和数据量大的情况下,如何能提高速度并简化查询语句?
你可以编写一个桌面应用程序和ASP服务中运行的ISAPI DLL交互。
不要增加ASP服务进程使用的帐户的权限——这极其危险。
我是用 webbroker 作的一个 isapi的 dll好像的确是 权限问题我用 mssql 的master..xp_cmdshell来调用 cmd.exe 就成功了
建议使用SharedMemory共享区与NT Service服务(需要自己编写)交互
这样可以保证有较好的安全性不要写桌面程序了,写服务程序才好的,你可以在不登录系统下使用