banner
李大仁博客

李大仁博客

天地虽大,但有一念向善,心存良知,虽凡夫俗子,皆可为圣贤。

vbscript

[VBA]Base64编码和Base64解码
VBA 实现 Base64 编码和 Base64 解码,用于处理加密的 URL 非常方便。 VBA Base64 编码 / 加密函数: 'VBA Base64 编码 / 加密函数: Function Base64Encode (StrA As String) As String…
[VBS]Excel获取所有Sheet的名称
1. 在当前 Sheet 里面获取当前 Sheet 名 选取任意单元格,编辑公式 =MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255) 2. 在当前 Sheet 里面获取 Workbook 下所有的 Sheet…
VBS实现目录下所有文件归集
一个简单的需求: Windows 环境下用 VBS/VBA 来实现抽取某一个特定目录下的全部所有文件,要求遍历当前目录下所有的子目录。 注意各子目录下文件的文件名可能会重复,各子目录下存在空目录的情况。 实现 VBS 代码 ' 需要遍历的目录路径 dim strDirPath =…
Windows下实现Deamon守护脚本
最近需要在 Windows 服务器上保持程序长期允许,因为程序比较老,无法用 srvany.exe 改写成 windows 服务,只能自己手动编写守护脚本实现,网上找了短比较靠谱的守护脚本,在此 mark 一下。支持监视进程、端口。 守护脚本定义部分 @echo off :: 检…
[VBS]文件批量转编码
工作中需要将大量 GB2312 编码的文件转换为 UTF-8 编码,Baidu 找了一段很实用的 VBS 可以有效解决问题。 使用方法也很简单,添加到工程调用 ConvertFile 即可。需要注意的是 Adodb.Stream 方式生成的 UTF-8 文件的头部会抱憾 3…

基于EXTJS+ASP的WEB桌面应用程序

CG 在 IBM-ETP 的培训已经进入了第二阶段了,今天要发布的就是 CG 在前几天做的一个基于 EXTJS 的小应用,学生的问题问答提问系统,目的是为了方便学生在授课和作业过程中能够相互之间交流和问题解答,同时为了即时交流,又增加了一个简单的即时通信的聊天工具。 系统设计也很…

发布本地美容工作室ASP网站整站源代码

继续上篇日志发布新整站代码,这次发布是最近刚完成的一个本地美容造型工作室的展示网站的整站源代码,技术上还是基于 ASP+Access,另外由于工作室的展示要求实现弹窗显示效果,所以使用了 Jquery 的相关技术,CG 本人一直对 Jquery 偏爱有加…
ASP中用Session方式保存数据库连接
ASP 中保存数据库连接有很多种,不过,对于一个 client 客户来说,如果将数据库连接保存在同一个会话中将大大减少建立数据库连接的次数,只使用一个连接就能完成所有工作,又减少连接池创建,分配,回收数据连接的消耗,同时当用户关闭浏览器时,会话自动消除…
Ownership of this blog data is guaranteed by blockchain and smart contracts to the creator alone.