[已解决]将一个程序注册成服务后，运行过程中会自动退出是怎么回事？

卫和谐

服务要与scm(services.exe)通讯,如果缺少这部份就会出现不可控制,就如LZ你前面说的“没有及时响应启动或控制 ...
ceoguang 发表于 2011-5-19 10:57

    服务要与scm(services.exe)通讯
这个如何做？

允许与桌面交互
这个已经设置了！

卫和谐

没有帮助解决这个问题的吗？

ceoguang

http://www.autoitx.com/forum.php ... mp;page=1#pid133709

卫和谐

P版这个不是我所需要的，
我将程序注册成服务后，开机时可以正常启动，但启动后约10秒后会自动退出，难道服务不能够支持有界面的程序？？？？？？？？？？？？？

tigercc99

看看学历了！

tigercc99

看看学历了！

卫和谐

希望有人继续给出解决办法！

m765555

应该是代码的问题吧，我以前做的服务就没有这种现象。

卫和谐

回复 23# m765555

代码没有问题，服务可以正常启动只是会自己中断~！

wsfda

回复 19# 卫和谐


    还是那句话，肯定是不符合规则，所以会启动后不到十秒自动停止，我也测试了，不是任何一个exe文件都可以作为服务器启动，切一直正常循环运行的
请教P版吧，或者好好看看P版的关于服务的代码

wsfda

回复 1# 卫和谐


     在基于Nt的系统中，全部服务任务都是由服务控制管理器（SCM）系统管理。SCM维持注册表中已知服务列表，打开各项服务（即可以是开机时自动打开，也可以使用户请求打开）。SCM把服务列表和它们的打开状态保存在注册表中，新服务项在安装时加入此列表中。另外也可以删除服务项目。
        作为服务任务的程序是一个普通的exe文件，但是必须满足特定的要求才能确切地与SCM连接。微软已经详细编制了这些函数的程序流，必须紧密依据此流程表，否则服务项目就不能运行。要求如下：
        1.服务项目的exe文件必须有一个普通的main或WinMain函数，此函数必须立即（特定情况下是在30秒之内）调用函数StartServiceCrtlDispatcher。调用之后，EXE文件就在SCM中注册，并且给出一个调用函数ServiceMain(在启动服务时调用）的指针。可以更改函数ServiceMain的函数名，然后就能在ServiceMain下面的记录文本中找到所用函数名的描述。main函数应该在注册ServiceMain之后返回。
        不能用命令行方式运行服务的exe文件。而应该在SCM知道的服务列表中安装，SCM会调用main函数，打开EXE文件。偶然用命令行方式执行服务时一定会出错，因为它不能连接SCM。
        2.SCM在打开服务时将调用函数ServiceMain。例如，当管理员选择“控制面板”上“服务”的start按钮时，SCM将在一个工作线程中执行函数ServiceMain。
        函数ServiceMain完成多项工作。其中最为主要的是立即调用函数RegisterServiceCtrlHandler，该函数能用SCM注册一个函数Handler以调用控制要求。此函数的函数名可以随便更改，但大会在Handler下面的记录文本中列出。函数RegisterServiceCtrlHandler返回一个句柄，服务在给SCM发送状态信息时将用到该句柄。
        函数ServiceMain还开始将完成实际服务任务的工作现程。一旦线程开始，函数ServiceMain就等待一个事件的发生。直道服务停止，函数ServiceMain才返回。之后，重新调用函数ServiceMain，SCM将重新开始该项服务。
        3.函数Handler包含一个转换语句，用于分析来自SCM的控制请求。默认时，SCM发送以下控制常数：
        SERVICE_CONTROL_STOP                 通知服务停止
        SERVICE_CONTROL_PAUSE               通知服务暂停
        SERVICE_CONTROL_CONTINUE         通知服务重新开始
        SERVICE_CONTROL_INTERROGATE   通知服务立即报告当前状态
        SERVICE_CONTROL_SHUTDOWN         通知服务紧急关闭
        用户也可以创建自定义常数（128~255之间），通过SCM把它们发送到服务项。
        当创建一个包含上述main、ServiceMain和Handler等函数的EXE文件以及一个包含服务线程的函数时，就得到了一个完整的服务任务。


请参考，我本人不是很懂

wsfda

同时希望和谐兄弟早日解决这个问题， 因为这个问题好像很多人需要，我也需要，搞定后上来分享下啊

charles

路过观望学习~~

卫和谐

回复 27# wsfda


    也不太明白，下面是我通过注册表添加服务的代码，有识之士请指教:

;注册服务
Func Installserver()
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'Type', 'REG_DWORD', '0x00000110')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'Start', 'REG_DWORD', '0x00000002')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'ErrorControl', 'REG_DWORD', '0x00000001')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'ImagePath', 'REG_EXPAND_SZ', @ScriptFullPath)
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'DisplayName', 'REG_SZ', @ScriptName)
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'ObjectName', 'REG_SZ', 'LocalSystem')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit', 'Description', 'REG_SZ', '防止上网沉迷系统')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit\Enum')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit\Enum', '0', 'REG_SZ', 'Root\LEGACY_PCLIMIT\0000')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit\Enum', 'Count', 'REG_DWORD', '0x00000001')
        RegWrite('HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Services\PcLimit\Enum', 'NextInstance', 'REG_DWORD', '0x00000001')
EndFunc   ;==>Installserver

wsfda

回复 29# 卫和谐


这个周末也好好研究研究，大家一起加油，OK了都上来分享啊
你的服务是注册成功了，关键还是exe程序...我也去再研究研究