能很好的解决发送中文乱码问题，建议在新版本中使用 Run ( notepad.exe ) WinWaitActive ( 无标题 - ) $Text = 中文 ：请多关照 @CR $Text = 繁體 ：請多關照 @LF $Text = 日文 ：よろしくお願いします @CR $Text = 特殊符号： ♂☆⊙①Ⅰ┆ @LF $Text = @CRLF 会换行2次 @CRLF $Text = End Send

需要 3.2.10++ 版本 才可以使用此 UDF 使用方法：比如我想启用一个服务 例子 #include Services.au3 #include Privilege.au3 _Service_Start ( WebClient ) 停用一个服务 例子 #include Services.au3 #include Privilege.au3 _Service_Stop ( WebClient ) 当前有的功能有服务的改变 、创建、`删除 、列举、 列举依赖的服务

很简单，做备用，O(_)O~ Func _Regsvr32 ( $File , $flags ) ;Note(s): flags标示中 1为注册0为反注册 ;Web: www.autoit.net.cn ;Author(s): Sanhen If Not FileExists ( $File ) Then Return SetError ( 1 , 0 , 0 ) Switch $flags Case 1 Run ( 'regsvr32' Chr

演示图: 代码如下： #include GuiConstantsEx.au3 Opt ( 'MustDeclareVars' , 1 ) _Main () Func _Main () Local $Flash , $FlashXml , $Bbs , $msg ; Create GUI GUICreate ( Flash 播放器 , 570 , 580 ) ;Create Flash $Flash = _CreateSWF ( '/uploadfile/200810/

功能请看代码中的详细注释： #include-once #include WinAPI.au3 ;~ ;测试时可使用下面两行检视效果 Local Const $date = '3000/02/28' MsgBox ( 0 , '' , '该月共有 ' KC_udf_MonLast ( StringLeft ( $date , 7 )) ' 天，' @CRLF $date '正确存在性：' KC_udf_Today ( $date ) @CRLF $date '的后一日是：' KC_udf_

UDF一： #include-once ;=============================================================================== ; ; 函数名称: _ChangeScreenRes() ; 详细信息: 修改 屏幕分辨率,刷新率. ; 版本: 1.0.0.1 ; 参数: $i_Width - 屏幕宽度(如1024X768 中的 1024) ; $i_Height - 屏幕高度(如1024X768 中的 768) ; &nbs

代码如下： _ReduceMemory ( @AutoItPID ) Func _ReduceMemory ( $i_PID = - 1 ) If $i_PID - 1 Then Local $ai_Handle = DllCall ( kernel32.dll , 'int' , 'OpenProcess' , 'int' , 0x1f0fff , 'int' , False , 'int' , $i_PID ) Local $ai_Return

代码如下： QueryWmiStatus () Func QueryWmiStatus () #cs ; 函数名称: QueryWmiStatus() ; 详细信息: 查询系统WMI服务是否存在，不存在便退出； 如果存在并且没有启动，那么设为自动运行并启动它。 ; 返回值 : 没有 ; 作者: Sanhen(gxbeiliu@163.com) #ce $foo = Run ( @ComSpec /c sc query winmgmt