-
ASP 连接 MYSQL 数据库
所属栏目：[百科] 日期：2020-12-17 热度：170
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 dim strserver,struid,strsapwd,strdbnamestrserver="127.0.0.1"struid="dbName"strsapwd="root"strdbname="1234"'MYSQLconfig_conn_str="driver={MyS[详细]
-
清除bin和obj文件夹的内容并清理vss相关文件
所属栏目：[百科] 日期：2020-12-17 热度：156
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Function DeleteSomeFiles(path) Dim file,folder,sfolder,fname,subfolder,files If Not objFSO.FolderExists(path) Then Msgbox "目标文件夹不存在[详细]
-
Access 2007/2010 VBA基于Windows认证的用户管理
所属栏目：[百科] 日期：2020-12-17 热度：156
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Private Sub Form_Load()Dim rs As RecordsetSet rs = CurrentDb.OpenRecordset("Select UserRole,FirstName,LastName From tblUser Where UserDomain[详细]
-
VBA中计算程序运行时间
所属栏目：[百科] 日期：2020-12-17 热度：178
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Dim a As DateDim b As Datea = TimeApplication.ScreenUpdating = False '''''''''''''''''''''''锁屏Call data.dataCheckCall data.storeFormationC[详细]
-
高可配置的 MDI 的 Tab 控件
所属栏目：[百科] 日期：2020-12-17 热度：120
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 ' returns a new gradient brush with the glass lookFriend Function CreateGlassGradientBrush( _ ByVal Rectangle As Rectangle,ByVal Color1 As C[详细]
-
ASP数据库操作类
所属栏目：[百科] 日期：2020-12-17 热度：127
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 %'#######以下是一个类文件，下面的注解是调用类的方法################################################'# 注意：如果系统不支持建立Scripting.File[详细]
-
VBScript实现密码生成器
所属栏目：[百科] 日期：2020-12-17 热度：65
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 !--filename : password generator -2.2.hta--!--Date : 2012/6/20--!--author : moose--htmlheadtitlePassword Generator/titleHTA:APPLICATION APPL[详细]
-
获取文件默认图标
所属栏目：[百科] 日期：2020-12-17 热度：54
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Private Structure SHFILEINFO Public hIcon As IntPtr Public iIcon As Integer Public dwAttributes As Integer MarshalAs(UnmanagedType.ByValTStr[详细]
-
列举成员服务器的计划任务
所属栏目：[百科] 日期：2020-12-17 热度：149
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Dim RootDSE,DomainNC,Connection,Command,RecordSet' BEGIN CALLOUT ASet RootDSE = GetObject("LDAP://rootDSE")DomainNC = RootDSE.Get("defaultNa[详细]
-
VBScript发送数据到剪贴板
所属栏目：[百科] 日期：2020-12-17 热度：190
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Set objIE = CreateObject("InternetExplorer.Application")objIE.Navigate("about:blank")objIE.document.parentwindow.clipboardData.SetData "text[详细]
-
ASP.NET 简单的 JSON 处理实现 Ajax 功能
所属栏目：[百科] 日期：2020-12-17 热度：103
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 var ajax = { setDebugMode: function(){ this.debugMode = true; },get: function (requestUrl,data,loaderImageId,onSuccess,onComplete) { if (loa[详细]
-
VBA粘贴Excel选定工作表范围到活动的PowerPoint幻灯片中
所属栏目：[百科] 日期：2020-12-17 热度：177
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Sub RangeToPresentation()' Set a VBE reference to Microsoft PowerPoint Object LibraryDim PPApp As PowerPoint.ApplicationDim PPPres As PowerP[详细]
-
VBA将Excel中图表和电子表格复制为图片
所属栏目：[百科] 日期：2020-12-17 热度：57
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 ActiveChart.CopyPicture _ Appearance:=xlScreen,Size:=xlScreen,Format:=xlPicture复制当前图表作为一个图片，使用此语法：ActiveChart.CopyPicture[详细]
-
asp 截取字符串函数
所属栏目：[百科] 日期：2020-12-17 热度：85
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 '截取字符串 strvalue(标题,字数)function strvalue(str,lennum)dim p_numdim iif strlen(str)=lennum thenstrvalue=strelsep_num=0x=0do while not p[详细]
-
Powerpoint中VBA编程技巧
所属栏目：[百科] 日期：2020-12-17 热度：160
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Sub PowerPointBasics_1() ' PowerPoint 的对象模型 Ojbect Model (OM)模型导航 ' 每个东东在 PowerPoint 中都是某个类型的对象 ' 想操作好 PowerPoin[详细]
-
修改代理服务器
所属栏目：[百科] 日期：2020-12-17 热度：71
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Const HKCU=H80000001 'HKEY_CURRENT_USERConst HKLM=H80000002 'HKEY_LOCAL_MACHINEConst REG_SZ=1Const REG_EXPAND_SZ=2Const REG_BINARY=3Const RE[详细]
-
VB.Net 2008 记事本代码
所属栏目：[百科] 日期：2020-12-17 热度：101
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Public Class Form1 Dim a As Integer Sub open() OpenFileDialog1.FileName = "" OpenFileDialog1.ShowDialog() If OpenFileDialog1.FileName "" The[详细]
-
保存Excel工作簿中所有的嵌入文件
所属栏目：[百科] 日期：2020-12-17 热度：133
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Function SaveEmbeddedFiles(fname) Dim wkB As Workbook Dim wksLog As Worksheet Dim wksDetail As Worksheet Dim sArchivePath As String Dim sFul[详细]
-
vb.net for 支付宝接口代码，非常精简的!
所属栏目：[百科] 日期：2020-12-17 热度：181
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 If PName = "" Then PName = ConfigTlb.Rows(0)("AlipayName") If PKey = "" Then PKey = ConfigTlb.Rows(0)("AlipayCheck") If PID = "" Then PID =[详细]
-
VB.NET 播放声音
所属栏目：[百科] 日期：2020-12-17 热度：144
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 以上是编程之家(jb51.cc)为你收集整理的全部代码内容，希望文章能够帮你解决所遇到的程序开发问题。 如果觉得编程之家网站内容还不错，欢迎将编程之家[详细]
-
使用ASP调用云验证码-印象码
所属栏目：[百科] 日期：2020-12-17 热度：131
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 !--在页面中需要放置验证码的位置添加如下代码--!--注意将上面XXXXXX部分修改为自己的PUBLICK_KEY--input type='hidden' id='YXM_here' / script type[详细]
-
VBScript自动配置Perl 5.14.2+Padre的环境变量
所属栏目：[百科] 日期：2020-12-17 热度：132
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Option ExplicitDim pSysEnvDim objFSOSet pSysEnv = CreateObject("WScript.Shell").Environment("System")Set objFSO=CreateObject("Scripting.File[详细]
-
VBA粘贴Excel活动工作表中每一嵌入式图表到一个新的PowerPoint幻
所属栏目：[百科] 日期：2020-12-17 热度：72
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Sub ChartsToPresentation()' Set a VBE reference to Microsoft PowerPoint Object LibraryDim PPApp As PowerPoint.ApplicationDim PPPres As Power[详细]
-
VBScript解析csv文件
所属栏目：[百科] 日期：2020-12-17 热度：122
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Const ForReading = 1 Set objFSO = CreateObject("Scripting.FileSystemObject") Set objTextFile = objFSO.OpenTextFile _ ("c:scriptsservers an[详细]
-
VB位操作函数
所属栏目：[百科] 日期：2020-12-17 热度：78
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 '功能： 将字节变量循环左移n位'入口参数：MoveByte 需要移位的字节变量' n 移动的位数'返回值： 移位后的字节变量Public Function ByteLeftMove(Move[详细]
