我有一个软件，我想让该软件在某台电脑只能执行一次，可是如何判断该软件exe执行文件已经在电脑中打开了呢？

这个EXE文件是你写的吗?

**************************************
*禁止程序两次运行
**************************************
PUBLIC Handle
DECLARE INTEGER CreateFileMapping IN kernel32.DLL INTEGER ,;
         INTEGER , INTEGER , INTEGER , INTEGER , STRING
DECLARE INTEGER GetLastError IN kernel32.DLL
DECLARE INTEGER CloseHandle IN kernel32.DLL INTEGER
Szname = 'Myonly'
Handle = CreateFileMapping(4294967295,0,4,0,128,Szname)
IF Handle = 0
    MESSAGEBOX('创建内存映谢文件失败'+CHR(13)+'工具无法在该操作系统里运行 !',0,'错误')
    QUIT
ELSE
    IF GetlastError() = 183
       = MessageBox('该工具已运行 !',64,'提示')
       CLOSE ALL
       CLEAR DLLS
       CLEAR EVENTS
       QUIT
    ENDIF
ENDIF

吹水佬师傅，程序时我写的，我要判断

** API CreateMutex() 防止程序重复运行
DECLARE LONG CreateMutex  IN Kernel32 STRING@, LONG, STRING@
DECLARE LONG GetLastError IN Kernel32
DECLARE LONG CloseHandle  IN Kernel32 LONG
cPrg  = PROGRAM()
hMutex = CreateMutex(NULL, 0, cPrg)
IF GetLastError() != 183    && ERROR_ALREADY_EXISTS
    MESSAGEBOX(cPrg + " 正常启动运行")
ELSE
    MESSAGEBOX(cPrg + " 不能重复运行")
ENDIF
CloseHandle(hMutex)

非常感谢，这几天很忙，在做别的程序，先结贴。

[此贴子已经被作者于2021-9-23 06:25编辑过]