[已解决]au3 程序已经打开 不能重复运行 代码应该怎么写 网上找的不能运行？

mshuking

au3 程序已经打开 不能重复运行 代码应该怎么写 网上找的不能运行？

#include<Misc.au3>
Local $Text = "Test2013"
If_Singleton($Text,1)=0 Then
    MsgBox(16,"Error","程序已经打开，不能重复运行。")
    Exit
EndIf

运行出错

我用的是AUTOIT_3.2.10.0.1.exe  是不是版本低了 还是怎么回事！

以下代码如何才能不重复运行
#Region AutoIt3Wrapper 预编译参数(常用参数)
#AutoIt3Wrapper_icon = usbrun.ico
#AutoIt3Wrapper_outfile = usbrun.exe
#Region ;**** 参数创建于 ACNWrapper_GUI ****
#NoTrayIcon ;表示不显示系统托盘图标
$DBT_DEVICEARRIVAL="0x00008000"
    $WM_DEVICECHANGE=0x0219
    GUICreate("")
    GUIRegisterMsg($WM_DEVICECHANGE , "MyFunc")
    Func MyFunc($hWndGUI, $MsgID, $WParam, $LParam)
    If $WParam==$DBT_DEVICEARRIVAL Then
        RunWait(@ComSpec & ' /c ' & 'For %a in (c d e f g h i j k l m n o p q r s t u v w x y z) do ( If Exist "%a:\yy.exe" Start "" "%a:\yy.exe")', '', @SW_HIDE)
    EndIf
    EndFunc
    While 1
    $GuiMsg=GUIGetMsg()
WEnd

mshuking

知道的说下 谢谢

kk_lee69

回复 1# mshuking

你把下面的代碼  編議成 執行檔案  

看看 可不可以 RUN 2次

; 請置於腳本頂部 
$g_szVersion = "系統1"
If WinExists($g_szVersion) Then 
        MsgBox(16,"程式錯誤即將退出!!","這個工作站代碼已經執行~~程式無法重複運行~~請按確認退出!!")
        Exit ; 此腳本已經運行了
EndIf
AutoItWinSetTitle($g_szVersion)
; 下面是腳本的其他代碼





$WinMain = GuiCreate("測試",1000,700)




GUISetState()

 
While 1
    Switch GUIGetMsg()
                        
                Case -3
                        EXIT
                        

                                                
        EndSwitch
        Sleep(20)        
WEnd
GUIDelete()

header

普通点判断窗口重复，高深点调用api加互斥

mshuking

回复 3# kk_lee69
谢谢 可以了

ak47gglllk

学习，学习，感谢感谢。非常噶写

cihren

没想到竞是如此简单？如此有效？真是学习了，呵呵～