Code Snippet

  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2013年11月22日

摘要: 巧用EditPlus包含VS2010网站项目资源从Eclipse转来开发VS2010的网站时,发现管理项目文件都要复杂很多。之前可以自动发布的图片、JS、CSS等资源文件,现在要经过复杂的步骤。先要包含,然后是设置复制到输出文件夹,Copy Always什么的。嵌套文件夹很多的时候,这个枯燥的事情很难完成。观察了项目文件,发现可以直接正则替换。于是拿出EditPlus来批量处理,大获成功,分享如下。【查找】【替换】\n Always\n 技巧提示:EditPlus对正则表达式的使用没有详细的说明文档,通常正则中使用点号.数字\d之类的在这里不是很好用。1、通过取反操作表示所有的字符是个不错的办 阅读全文
posted @ 2013-11-22 16:24 kmlxk 阅读(267) 评论(0) 推荐(0) 编辑

2013年10月20日

摘要: 公有云到私有云随着云计算概念的落地,各种之前所谓的网盘都摇身一变,改名为云盘。例如微云(http://www.weiyun.com/ )、百度云(http://pan.baidu.com )都提供动辄了10T容量。但是以目前的互联网接入速度,即使光纤到户,将所有个人文档放到云盘中仍然不现实,并且在一些重要保密文档的处理上,存在云盘也是不那么放心的事情。因此民间各高手也在探索私有云方案,例如国内迷... 阅读全文
posted @ 2013-10-20 01:09 kmlxk 阅读(2282) 评论(0) 推荐(0) 编辑

2013年4月14日

摘要: Word中的表格序号可以通过添加“题注”的方式进行自动管理,但是有些特殊情况下采用了人工编号的方式。随着表格的增加,表格序号的更新成为繁重的工作,使用下面的VBA脚本可以快速的更新。使用要求:1.表格标题必须位于表格上方一行2.表格标题必须以“表”字开头3.表格标题中必须出现数字建议使用的时候在Selection.Text = str(i)这一行下断点,观察修改过程,避免错误修改Option Explicit'更新表格序号Public Sub 更新表格序号() Application.ScreenUpdating = False Dim oDoc As Document ... 阅读全文
posted @ 2013-04-14 21:07 kmlxk 阅读(757) 评论(0) 推荐(0) 编辑

2013年3月24日

摘要: 快速禁用ie6的脚本,保存为disable-ie.cmd双击运行即可@ECHO offECHO ============================ 快速禁用IE6 ============================ECHO 使用方法: disable-ie.cmd [y/n] 或者运行时输入y/n禁用或启用IEECHO y:禁用 n:启用 (重启后才能生效) Author: kmlxk#yahoo.com.cnREM ECHO 命令行参数: %1%SET in=IF "%1%"=="n" GOTO ENABLE_IEIF "%1%& 阅读全文
posted @ 2013-03-24 13:43 kmlxk 阅读(231) 评论(0) 推荐(0) 编辑

2013年2月22日

摘要: 1. 简介tiny-json是一个用于生成和解析JSON格式的Delphi小单元(约有1600行代码),可以和FastMM、FastCode等一起使用,以提高解析速度。2. 使用方法a. 将下载到的json-1.4.zip解压到任意目录,并在Delphi项目中添加*.pas文件。项目网址http://code.google.com/p/tiny-json/b. 将FastMove文件*.pas添加到Delphi项目。下载地址:http://download.csdn.net/download/xiaobai801124/3958296c. 将FastCode项目中的FastcodeCPUID. 阅读全文
posted @ 2013-02-22 16:09 kmlxk 阅读(1269) 评论(0) 推荐(0) 编辑

2012年5月10日

摘要: Sub 批量设置行距() Dim oSlides As Slides Dim oSlide As Slide Dim oPre As Presentation Dim oShape As Shape Dim oTextFrame As TextFrame Set oPre = ActivePresentation Set oSlides = oPre.Slides '每一张幻灯 For i = 1 To oSlides.Count Set oSlide = oSlides.Item(i) '每一段文本 ... 阅读全文
posted @ 2012-05-10 14:52 kmlxk 阅读(866) 评论(0) 推荐(0) 编辑

摘要: '设置行合并表格的边框'@Author: kmlxk#yahoo.com.cn'@Date: 2012-05-10'@Desc: Excel支持行合并功能,但是如何为整行设置边框,并且不显示行内部横边框呢' 这段代码通过第一列来识别行,并横向选择整行,最后设置除内部横线外的边框'Sub 设置行合并表格的边框() Dim strStartCell As String Dim i As Long Dim iStart As Long Dim iEnd As Long Dim iRowStart As Long Dim iRowEnd As Long 阅读全文
posted @ 2012-05-10 13:37 kmlxk 阅读(999) 评论(0) 推荐(0) 编辑

摘要: '填充序号'@Author: kmlxk#yahoo.com.cn'@Date: 2012-05-10'@Desc: Excel的填充功能比较智能, 但是在合并过的单元格上填充时要求大小一致。这段代码模拟手工方式输入序号,避开了填充时的各种要求。简单粗暴的填充方式可能有点慢,慎用于上千行的序号填充。'Sub 在列上模拟手工填充序号() Dim strStartCell As String Dim i As Long Dim iStart As Long Dim iEnd As Long ' 初始化变量 ' 起始单元格 strStartC. 阅读全文
posted @ 2012-05-10 11:30 kmlxk 阅读(580) 评论(0) 推荐(0) 编辑

2011年11月14日

摘要: 1. 截取身份证中的日期=MID(I2,7,4)&"-"&MID(I2,11,2)&"-"&MID(I2,13,2) 阅读全文
posted @ 2011-11-14 11:26 kmlxk 阅读(171) 评论(0) 推荐(0) 编辑

2011年5月11日

摘要: 原文地址:http://blog.syshalt.net/index.php/2010/09/12/compile-c-applications-with-gcc-on-ios-4-iphone/查阅了Internet上很多的相关资料,我从Anastas Stoyanovsky那获得一些信息,大多数人说如果在iOS 4上安装了libgcc将会导致启动时崩溃,但是事实并不是这样为了在iPhone上编译和运行C应用程序,你要做如下步骤:1. 越狱。请自行Google2. 从Cydia上安装 OpenSSH3. 通过无线网和ssh连接到iPhone4. 下载libgcc。运行wget http:// 阅读全文
posted @ 2011-05-11 16:00 kmlxk 阅读(6434) 评论(0) 推荐(0) 编辑