windows启动程序消息顺序

setfont

initdialog

showwindow

windowpositionchanging

windowpositionchanged

geticon

nccalcsize

move

size

acitveapp

ncactivate

geticon

acitvate

ime_setcontext

ime_notify

setfocus

killfocus

wordpress禁用段落格式化(段落自动加p标签)

wordpress的后台编辑器使用的是TinyMCE,后台写文章的时候,键盘敲击回车后,并没有在代码里面自动被p标签包裹,mysql数据库里面存的也是不带p标签的。因为wordpress在页面打开的时候会自动为我们加上p标签。

wordpress禁用段落格式化(段落自动加p标签)

(前台源代码自动加上了p标签)

wordpress禁用段落格式化(段落自动加p标签)

(数据库里面没有p标签)

关于这个问题有一个唯一的缺点,就是当你将wp博客转移到其他博客程序的时候,因为内容里面全无p标签,会让前台排版打乱。我的方法是后台使用ckeditor编辑器从新更新了所有的文章,数据库就有了p标签。然后我们可以放心的禁用掉自动加p标签的wordpress filter。使用插件disable-wpautop 即可到达这个目的,其实插件代码很简单:

<!–?php
/*
Plugin Name: Disable wpautop
Plugin URI: http://tunps.com
Description: Disables WordPress automatic paragraph formatting
Author: freeman
Version: 1.0
Author URI: http://tunps.com
*/
remove_filter (‘the_content’, ‘wpautop’);
remove_filter (‘comment_text’,’wpautop’);
?>

定时提醒器

定时提醒器

“定时提醒器”是一个500行代码的win32程序,定时以windows桌面右下角弹窗口的形式提醒用户。

功能

  1. 24小时制,精确到分钟。
  2. 设置开机是否自动运行。
  3. 设置周几提醒。

使用方法

  1. 添加提醒:输入时、分、和提醒内容,然后点“↓添加”。
  2. 编辑提醒:鼠标左键单击需要编辑的提醒项目、然后修改提醒内容,修改好之后,点“↓添加”即可完成修改。
  3. 删除提醒:鼠标双击需要删除的提醒即可。
  4. 开机启动:勾选“开机自动启动并最小化到托盘”,点“保存设置”。
  5. 保存设置:编辑好提醒之后,点“存设置”,可以让所有设置写入配置文件,下次 打开程序后自动读取配置。

已知问题

  1. 到了时间提醒弹窗打开后,在1分钟内关闭会重复弹出,直到一分钟结束。可以等待1分钟后关闭弹窗, = =#。
  2. 可以设置开机启动,单无法开机启动后最下化到托盘。

下载

程序:http://tunps.com/lab/reminder/reminder.rar(无法启动,请下载并安装Microsoft Visual C++ 2010 可再发行组件包 (x86),一般都无需下载,因为自带了msvcr100.dll)。

源代码(VS2010项目文件):http://tunps.com/lab/reminder/reminder_src.rar

Excel VBA宏删除指定行/最后一样

有时候从网页表格中复制进excel里面,会有多余的表头信息和表尾信息,删除表头/表尾行的宏可以这么写:

Sub DeleteHeadAndTail()
    'delete line 1,2,3
    ActiveSheet.Range("1:1,2:2,3:3").Delete
    'delete last line
    Range("a65536").End(xlUp).Select
    Selection.EntireRow.Delete
End Sub

Excel VBA宏批量字符串替换

某业务系统导出的excel包含了很多多余的标签(可能是系统功能错误吧)。

使用系统自带的替换功能需要输入待替换的字符串以及替换成的字符串,麻烦。所以写个macro,一个快捷键能够完成此操作。

Excel VBA宏批量字符串替换

按ALT+F11打开VB编辑器,在PERSONAL.XLS模块中写入如下代码如下:

SubReplaceATag()
    ForEachcInActiveCell.CurrentRegion.Cells
        IfInStr(c.Value,””)Thenc.Value = Replace(c.Value,””,””)
    Next
EndSub

ALT+F8打开【宏】对话框点【编辑】PerSONAL.XLS!RepaceATag,弹出【不能在隐藏工作簿中编辑宏。请选定“取消窗口隐藏”命令以显示工作簿。】在Excel【窗口】菜单中选择【取消隐藏(U)…】就不会弹出警告,宏也可以编辑运行了。

Excel VBA宏批量字符串替换

按ALT+R就去掉了所有的字符串。以后打开新的excel,直接ALT+F8,选择PerSONAL.XLS!RepaceATag,然后ALT+R就运行选定的宏。 

参考: 

 

USBAutoCopy:USB存储设备文件自动复制

在公司上班的同事工作有一部分是拷贝终端里面SD卡的日志,日志(文本文件)存在于不同的目录,以前每次电脑插上SD卡之后进入不同的目录ctrl+C然后再ctrl+V,而且每个终端的日志都要根据终端唯一ID号分别放在单独的目录。工作十分繁琐耗时,当我写完这个UsbAutoCopy之后,才发现以前的拷贝方式简直是弱爆了。下面图中的【D: est105285】105285就是终端唯一ID号。

USBAutoCopy:USB存储设备文件自动复制

用法

运行程序,在【文件列表】文本框里面填写需要在移动存储设备中拷贝的文件列表,每个文件一行,必须要“”开头。不要有留空行,【复制到目录中】设置拷贝目标文件夹,必须是一个已经存在的目录,并且不能为空。移动存储设备(U盘、SD卡….)插入后程序自动识别盘符并开始复制文件。并在【日志】中显示复制文件的结果是成功还是失败,以及失败原因。

下载

因为这个程序针对公司内部,对其他人来说没有任何实用价值,给出二进制和源码仅供交流参考。

实用visual studio 2010开发,二进制zip里面已经加入vc++ 2010 runtime(msvcr100.dll),某些系统如果无法运行,请下载Microsoft Visual C++ 2010 可再发行组件包 (x86)

源码:UsbAutoCopy.V1.0.Src

二进制:UsbAutoCopy.V1.0.Bin