#APS/Basic

删除魔兽世界缓存文件才经常掉线者使用（安装插件者禁用）

Option Explicit Private Const FO_DELETE = &H3 Private Const FOF_ALLOWUNDO = &H40 P…

#APS/Basic

VBA粘贴Excel活动工作表中的每一嵌入式图表到一个新的幻灯片中并使用图表标题作为幻灯片标题

Sub ChartsAndTitlesToPresentation() ' Set a VBE reference to Microsoft PowerPoint Object L…

#APS/Basic

execl vb统计租户水电费的打印单按钮代码

Sub update() ' =IF(ABS(E10)<0.005,"",IF(E10<0,"负",)&IF(INT(ABS(E10)),TEXT(INT(AB…

#APS/Basic

dw&ASP开发网站前后台

<%=不好意思这只是一个教程哦%>

#APS/Basic

VBA将Excel数据表格直接导入SQL Server数据库

Option Explicit Public Sub CreateAllSheetsInsertScript() On Error GoTo ErrorHandler 'recor…

#APS/Basic

用VBS分割二进制文件

Option Explicit Function IIF(judgement, a, b) If judgement Then IIF = a Else IIF = b End I…

#APS/Basic

餐饮管理系统

#APS/Basic

批量编码转换包括gb2312,utf-8,unicode,支持拖动

'/*========================================================================= ' * Intro 把要转…

#APS/Basic

VBScript文件版本压缩管理

On Error Resume Next Dim fso,fp,oApp,targetfile,c,zipfile c=2 Set fso=CreateObject("Script…

#APS/Basic

execl vba一个统计数据的报表模块

Attribute VB_Name = "reportcreate20130804" 'All Rights Reserved Deserved by 蓝宝石的傻话 Dim daq…

#APS/Basic

用于修改 DNS IP 地址的 VB Shell 脚本

' This script changes the DNS servers for a network device in Windows ' to a defined IP or…

#APS/Basic

asp短信接口源码，比较简单，但也挺实用用的（两个写法）

写法一： <% Sub sendsms(mobile,msg) '如需要发送多个手机号，请自动循环，多个手机号之间用“,”分隔，最后手机号码后不加,号 '或调用我们 Http…