hds1989824 发表于 2013-1-17 11:03:43

把au3编译的exe 注册为服务,启动不了

已经实现对服务的控制.
现在想把我编译的EXE注册为系统服务,免得服务器重启了,程序也退出了.
代码如下
#include <SmtpMailer.au3>
#Include <ServiceControl.au3>
Local $alarmtype
$alarmtype='服务挂了'
$sServiceName="linkService"

While 1
       $server_status=_ServGetDetails($sServiceName)
        If StringCompare($server_status,"running")<>0 Then
                $s_Subject=$alarmtype
                sendmail()
        EndIf
        ;Sleep(5*60*1000)
WEnd;为真停止运行                       
                       
Func sendmail()
      $s_SmtpServer = "smtp.126.com" ;SMTP服务器
      $s_FromName = "liu" ;邮件发送人
      $s_FromAddress = "smtptest@126.com" ;邮件发送者地址
      $s_ToAddress = "smtptest@126.com" ;收件人地址
      ;$s_Subject = "网关出错了！" ;邮件标题
      $as_Body = "";邮件正文
      $s_AttachFiles = "" ;附件地址
      $s_CcAddress = "" ;抄送地址
      $s_BccAddress = "" ;密件抄送地址
      $s_Username = "smtptest@126.com" ;用户名
      $s_Password = "12232311989824" ;密码
      $IPPort = 25 ;发送端口，Gmail使用的发送端口为465
      $ssl = 0
      Global $oMyRet
      Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc")
      $rc = _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, $s_AttachFiles, $s_CcAddress, $s_BccAddress, $s_Username, $s_Password, $IPPort, $ssl)
      If @error Then
                MsgBox(0, "邮件发送失败", "错误代号:" & @error & "    描述:" & $rc)
      EndIf
EndFunc   ;==>sendmail
利用srvinstw.exe 这个工具进行生成的.

hds1989824 发表于 2013-1-17 11:08:04


这个是工具

31408177 发表于 2013-1-29 16:55:46

看不懂 帮你顶顶吧

sbtddh 发表于 2013-1-30 15:08:55

服务好像限制了权限

sbtddh 发表于 2013-1-30 15:08:57

服务好像限制了权限

sbtddh 发表于 2013-1-30 15:09:46

之前我们的东西就是可用但服务不行

sbtddh 发表于 2013-1-30 15:09:48

之前我们的东西就是可用但服务不行

sunless 发表于 2013-1-30 15:36:32

没搞过服务. 不清楚 .
不过 有个方法可以避开这问题.
你把服务器设置成自动登录. 然后 程序加到启动组里.不就可以了.
另外 如果 怕别人动电脑 .可以再往启动组里加一个锁定桌面的批处理.

dosy001 发表于 2013-2-25 09:38:50

au3编译的exe 注册为服务

DenQ 发表于 2013-2-26 16:55:09

座=大神 。。
页: [1]
查看完整版本: 把au3编译的exe 注册为服务,启动不了