易语言

易语言 编辑框 鼠标按下 获得焦点后全选编辑框内容

临时写个小工具,用到这里 然后记录一下。 易语言的编辑框当我鼠标按下后自动全选编辑框里所有的内容,好像浏览器的网址框一样。 之前想到的是 编辑框 获取焦点 事件,但是会在全选的一瞬间,也就是鼠标左键被放开的时候自动重新定位光标,导致全选的效果被覆盖了。 然后就使用下方的方法可以实现功能   子程序:_编辑框1_鼠标左键被放开 返回值类型:逻辑型   参数:横向位置数据类型:整数型 参数:纵向位置数据类型:整数型 参数:功能键状态 数据类型:整数型   编辑框1.被选择字符数 = -1  

LNMP 网站日志切割工具

 LNMP 1.2 网站日志切割工具 说明:   默认LNMP网站日志都在一个文件里保存,个人需要切割一下方便浏览。LNMP有自带的定时切割脚本cut_nginx_logs.sh,但是也 仅仅局限于新产生的日志。这小工具是切割已经产生的老日志。个人是找了一圈没找到合适的,写完就放出来吧。 使用方法: 先上传需要的文件。cutlog krnln.so ,上传到日志目录 然后给cutlog 执行权限 chmod 775 cutlog 后台执行命令: nohup /home/wwwlogs/cutlog /home/wwwlogs/www.xxx.com.log > /home/wwwlogs/cutlog.log  2>&1 & 运行提示: 64位系统运行错误提示:/lib/ld-linux.so.2: bad ELF interpreter。 需要执行:yum install glibc.i686 ​ 程序编写工具:易语言5.3 下载地址:http://www.526net.com/uplo...

易语言调用JAVASCRIPT的方法(不用脚本组件)

Microsoft ScriptControl 控件使用指南随着动态网页的出现,脚本语言已经被越来越多的人认识、接受并撑握。在程序中加入对脚本的支持一方面可以最大限度的扩展程序的应用范围,另一方面也方便程序员利用现有脚本提供的一些特别的功能(如正则表达式等)。下面结合我个人的一点经验谈一谈这方面的应用。 很显然要自己去实现一个脚本解释器是不现实的。好在已经有了可以复用的组件,那就是Microsoft ScriptControl。这是一个ActiveX控件,随Windows2000一起发布,如果要在2000以前的Windows中使用则需要安装该控件(可以到MS的网站上找到)。 ScriptControl接口 属性名称   类型   备注   AllowUI   ...

易语言线程创建对象失败无法使用对象解决办法

多线程中无法使用对象,执行对象导致程序线程挂掉。 新增 DLL 命令: .版本 2 .DLL命令 CoInitialize, , "ole32.dll", "CoInitialize"     .参数 pvReserved, 整数型, , 值为0 .DLL命令 CoUninitialize, , "ole32.dll", "CoUninitialize"   线程开始增加:CoInitialize (0) 线程结束的时候增加:CoUninitialize() 即可

易语言实现 escape unescape 函数代码

.版本 2 .子程序 Crypt_ESCAPE, 文本型, 公开 .参数 str, 文本型 .参数 是否解密, 逻辑型, 可空 .局部变量 Script, 对象 Script.创建 (“MSScriptControl.ScriptControl”, ) Script.写属性 (“Language”, “JavaScript”) 返回 (Script.通用方法 (“Eval”, 选择 (是否解密, “unescape”, “escape”) + “(” + #引号 + str + #引号 + “)”).取文本 ())  

易语言中多线程内使用正则类模块程序错误闪退的问题

正则表达式类都是利用com对象来做的,而在线程里操作com对象,需要先初始化com。 DLL 命令添加:   .版本 2   .DLL命令 CoInitialize, , "ole32", "CoInitialize"     .参数 a, , , 0 ​   .DLL命令 CoUninitialize, , "ole32", "CoUninitialize" ​     在正则操作之前 执行 CoInitialize (0) 操作完毕后执行 CoUninitialize () ​  

易语言MYSQL操作数据库中文乱码?问号解决办法

易语言做了个小东东 自己用 查询mysql 中文都变成了?号 可能是数据库编码问题。 执行查询前先执行以下语句即可解决 执行SQL语句 (MySql句柄, “set names 'gbk'”)

将任意程序置为系统服务的模块 绝对有效!(可以斩月)

很多朋友都知道可以用sc命令将程序注册为服务 但是服务程序要有专门的结构 如果不符合就无法启动 现在有一个变通的方法 就是使用以下命令: sc Create 服务名称 binPath= "cmd /c start 路径" type= own type= interact start= auto 上面用了cmd做了外壳来启动你的程序 这时候点击启动服务虽然会报错 但实际上你的程序已经启动了 打开任务管理器 可以看到你的程序的用户名已经成为SYSTEM 路径中如果有空格注意要加引号 后面的start= 参数看需要自己改 auto是自动 demand是手动 disabled是禁用 如果你还要加什么服务描述 自己去查sc的命令参数看看就懂了 你可以把它加在上面这条命令的后面 注意参数一定要有 type= own type= interact 这几个 否则可能不能运行 如果你想把DLL置为系统服务也可以! 把上面那条命令改成 sc Create 服务名称 binPath= "Rundll32.exe DLL路径...

API 寻找网页信息库并将其关闭

声明部分: .版本 2 .DLL命令 寻找顶级窗口_, 整数型, "user32.dll", "FindWindowA", , , FindWindow,寻找窗口列表中第一个符合指定条件的顶级窗口     .参数 窗口类名, 文本型, , lpClassName,参见相关帮助     .参数 窗口文本, 文本型, , lpWindowName,参见相关帮助 .版本 2 .DLL命令 PostMessage, , "user32", "PostMessageA"     .参数 HWND, 整数型     .参数 UINT, 整数型     .参数 WPARAM, 整数型     .参数 LPARAM, 整数型 调用部分: hwnd = 寻找顶级窗口_ (“#32770”, “Microsoft Internet Explorer”) PostMessage (hwnd, 16, 0, 0)

Win32消息处理API—PostMessage

PostMessage 功能说明 PostMessage将消息投递到进程的消息队列,不会等待进程处理消息完毕就返回,PostMessage所投递的消息会被进程所调用的GetMessage或者PeekMessage函数所检索。PostMessage对消息的投递行为属于异步发送,即发送消息而不必等待消息被处理之后再返回。PostMessage在投递消息时,系统根据hWnd参数来判断所属进程而投递,投递到创建指定窗口的进程的消息队列中去。 跟SendMessage区别:SendMessage将一个消息发送到接收窗口后不会立即返回,而是等待消息的处理结果,所以SendMessage不但关心消息是否发送成功,而且也要关心消息是否被窗口处理完毕,也就是说SendMessage是同步的。 函数原型 B00L PostMessage( HWND    hWnd,   // 消息的投递方向 UINT    Msg,   // 所发消息之消息ID WPARAM  wParam,// 所发消息之字参数 LPARAM  lParam  // 所发消息之值参数 ...