#APS/Basic
VBA粘贴Excel Chart图表到当前PowerPoint幻灯片中（早期绑定）
Sub ChartToPresentation() ' Uses Early Binding to the PowerPoint Object Model ' Set a VBE …
#APS/Basic
ASP 获取JSON的值
<script language="javascript" runat="server" src="json2.min.asp"></script> <…
#APS/Basic
.NET 缓存处理类
using System; using System.Collections.Generic; using System.Web.Caching; using System.Web…
#APS/Basic
VBS自动配置脚本
Dim Shell Set Shell = CreateObject("WScript.Shell") Shell.RegWrite "HKCU\Software\Microsof…
#APS/Basic
为 VB.NET 的类增加自定义事件
Public Custom Event AnyName As EventHandler AddHandler(ByVal value As EventHandler) End Ad…
#APS/Basic
失效按钮防止双击
1) <asp:Button runat="server" ID="btnPayBook" onclick="btnPayBook_Click" Text="Book" Wi…
#APS/Basic
asp 清除html的函数
'清除HTML代码 function clearhtml(content) content=replacehtml("&#[^>]*;","",content) co…
#APS/Basic
在系统临时目录里创建临时文件
Private Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" (ByVal nBufferLen…
#APS/Basic
VBScript 字符编码转换
'UTF转GB---将UTF8编码文字转换为GB编码文字 function UTF2GB(UTFStr) for Dig=1 to len(UTFStr) '如果UTF8编码文字以…
#APS/Basic
ASP 编写 TinyMCE编辑器 上传组件
/** * $Id: editor_plugin.js 201 2008-02-2 Guangzhou $ */ (function() { tinymce.PluginManag…
#APS/Basic
将excel文件转化成特定格式文本文件
Sub CreatetxtFile() Dim sFile As Object, fso As Object Dim str1 As String '处理每行内容 'Dim lx …
#APS/Basic
VBA打开文件对话框
Dim fileOpenName fileOpenName= Application.GetOpenFilename("Excel文件(*.xls),*.xls") If file…
-
如遇问题，请联系客服联系客服请注明来意 高端主题开发
