开发windows服务中要启动参数的有关问题
开发windows服务中要启动参数的问题
对这方面不太了解, 在哪儿加,怎么加
比如要要写一个服务,启动的时候(命令行下):net start myservice -t -r
服务程序里面怎么写,另外就是后面的参数是不是一定要是字符型
谢谢
------解决方案--------------------
回星级大师考题(不管对错):
ShellExecute() 或 WinExec() 或... 都是可以带参数执行的
------解决方案--------------------
用net start启动服务时是不能带参数的。
服务的参数是在服务中设置的, 比如COM+ Event System服务的执行文件路径为C:\WINNT\system32\svchost.exe -k netsvcs,参数是写在这个里面的,不是在启动时设置的。
------解决方案--------------------
program Project1;
uses
Forms,
Windows,
SysUtils,
Unit1 in 'Unit1.pas ' {Form1};
{$R *.res}
var
VarIn : string;
begin
if FindCmdLineSwitch( 'test ')
then VarIn := 'found VarIn ' else VarIn := 'No VarIn ';
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Form1.Caption := VarIn;
Application.Run;
end.
测试:
----> cmd
----> project1 /test
------解决方案--------------------
星级大师的表达能力令人佩服。-_-!
似乎前面要问的问题,侧重点就在如何搞参数上;而似乎楼上重新命题后,参数问题又解决了,侧重点又在如何实现倒计时关机了....
------解决方案--------------------
感觉没必要做成服务的,直接运行某个程序, 它能接受倒计时时间的参数, 运行之后隐藏于后台, 到了时间就关机。
对这方面不太了解, 在哪儿加,怎么加
比如要要写一个服务,启动的时候(命令行下):net start myservice -t -r
服务程序里面怎么写,另外就是后面的参数是不是一定要是字符型
谢谢
------解决方案--------------------
回星级大师考题(不管对错):
ShellExecute() 或 WinExec() 或... 都是可以带参数执行的
------解决方案--------------------
用net start启动服务时是不能带参数的。
服务的参数是在服务中设置的, 比如COM+ Event System服务的执行文件路径为C:\WINNT\system32\svchost.exe -k netsvcs,参数是写在这个里面的,不是在启动时设置的。
------解决方案--------------------
program Project1;
uses
Forms,
Windows,
SysUtils,
Unit1 in 'Unit1.pas ' {Form1};
{$R *.res}
var
VarIn : string;
begin
if FindCmdLineSwitch( 'test ')
then VarIn := 'found VarIn ' else VarIn := 'No VarIn ';
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Form1.Caption := VarIn;
Application.Run;
end.
测试:
----> cmd
----> project1 /test
------解决方案--------------------
星级大师的表达能力令人佩服。-_-!
似乎前面要问的问题,侧重点就在如何搞参数上;而似乎楼上重新命题后,参数问题又解决了,侧重点又在如何实现倒计时关机了....
------解决方案--------------------
感觉没必要做成服务的,直接运行某个程序, 它能接受倒计时时间的参数, 运行之后隐藏于后台, 到了时间就关机。