![](https://img-blog.csdnimg.cn/20201014180756928.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
windows
青水
高级程序员,系统分析师
展开
-
CLISP 调用 Windows API 生成GUID
(defpackage :whj.guid (:use :cl :ffi) (:export #:GUID #:NEW-GUID)) (in-package :whj.guid) (def-c-struct GUID (d1 uint32) (d2 uint16) (d3 uint16) (d4 (c-array uint8 8))) (def-call-out CoCreateGuid (:name ".原创 2020-11-23 22:38:48 · 262 阅读 · 0 评论 -
简单地自定义实现 windows API InterlockedIncrement
自定义实现 windows APIInterlockedIncrement: long __declspec(naked) incby(volatile long*,int) { __asm { push ebp mov ebp,esp push ebx mov ebx, [ebp+8] ...原创 2019-07-20 15:18:17 · 185 阅读 · 0 评论 -
RegisterApplicationRestart
#include #include BOOL SetRestartApplication(const TCHAR* commandLine) { typedef HRESULT (WINAPI* PFN_RegisterApplicationRestart)(LPWSTR,DWORD); PFN_RegisterApplicationRestart pfnRegisterAp原创 2015-01-18 19:37:20 · 1855 阅读 · 0 评论 -
locale的设定及其LANG、LC_ALL、LANGUAGE环境变量的区别
LC_ALL:影响所有的设定项。 LC_CTYPE:仅影响指定的设定项。 LANG:改变没有设定LC_CTYPE的其它项的默认值。 获取之前的locale设定: const conar * cur_locale = setlocale(LC_CTYPE,NULL); 改变当前的多字节环境: const char * szlocale = setlocale(LC_CTY原创 2015-01-17 10:25:46 · 502 阅读 · 0 评论 -
echo 输出空行到文件
echo.>>a.txt原创 2014-05-18 00:17:41 · 3080 阅读 · 0 评论 -
关于 SetConsoleCtrlHandler
函数原型: WINBASEAPBOOL WINAPI SetConsoleCtrlHandler( __in_opt PHANDLER_ROUTINE HandlerRoutine, __in BOOL Add);原创 2014-05-17 21:55:21 · 1656 阅读 · 0 评论 -
Log.pm
#!perl #日志打印 use warnings; use strict; package Log; our $DEBUG = 1; sub DEBUG { if($DEBUG) { my $msg = shift; print "DEBUG: $msg"; } } #错误信息 sub ERROR { my $msg = shif原创 2014-03-07 00:37:15 · 513 阅读 · 0 评论 -
维护常用命令
查看本机用户: net user 添加登陆用户: net user /ADD user password 例: net user /ADD test "abc@12345"; 修改密码: net user user_name password 查看本机的用户组: net localgroup 把用户添加到组中 net localgroup groupname usern原创 2014-03-06 20:47:36 · 474 阅读 · 0 评论 -
CMDHelper.pm
use strict; use warnings; push @INC,substr($0,0,rindex($0,"\\")); require "Log.pm"; package CMDHelper; sub ExecuteCmdOrder { my $cmdOrder = shift; Log::DEBUG("CMDORDER: $cmdOrder\n原创 2014-03-07 00:38:39 · 694 阅读 · 0 评论 -
DicParams.pm
#!perl #参数字典 use warnings; use strict; package DicParams; sub new { my($this,@argv) = @_; my %this =(); foreach(@argv) { #my($val_name,$val_value) = split /=/; #对参数中有=的情况解析出错 m原创 2014-03-07 00:36:24 · 451 阅读 · 0 评论 -
windows cmd.exe 学习(1)
1、关于在cmd.exe命令中创建新用户或修改密码的命令 net user new_user_name new_user_password /ADD 2、在cmd 命令行启动以其它用户身份运行的程序命令 runas 命令原创 2014-01-01 22:21:12 · 501 阅读 · 0 评论