-
VBScript终止线程
所属栏目：[百科] 日期：2020-12-17 热度：113
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Function KillProcessByModuleName(moduleName) On Error Resume Next Set oNet = CreateObject("Wscript.Network") user = oNet.UserName KillProces[详细]
-
.NET 创建动态缩略图
所属栏目：[百科] 日期：2020-12-17 热度：58
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Function CreateJPEGThumbnail(ByVal inSourceFile As String,ByVal inDestinationFile As String,ByVal ThumbWidth As Integer,ByVal ThumbHeight As[详细]
-
用VBA解决Windows空当接龙的617局
所属栏目：[百科] 日期：2020-12-17 热度：137
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Declare Function FindWindow Lib "user32" Alias _ "FindWindowA" (ByVal lpClassName As String,ByVal lpWindowName As String) As Long Declare Fu[详细]
-
获取同名进程的数量
所属栏目：[百科] 日期：2020-12-17 热度：200
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Option ExplicitDim objWMIService,objProcess,colProcess,strComputer,processName,instancesstrComputer = "."instances = 0processName = "wscript[详细]
-
ASP分页是计算页面总数的方法
所属栏目：[百科] 日期：2020-12-17 热度：79
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 下面是我从网上找到三种ASP分页时计算页面总数的方法，此方法仅为分页时计算页面总数，并非整个分页代码： 方法一 复制代码 代码如下:' HTMer_RecordC[详细]
-
多个变量 取最大的变量
所属栏目：[百科] 日期：2020-12-17 热度：89
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 设 abcde 为五个数字变量Dim a() As Integer = {a,b,c,d,e,0} For index As Integer = 0 To 4 If a(index) = (a(0) + a(1) + a(2) + a(3) + a(4)) / 5[详细]
-
asp(vbscript)数据库操作类
所属栏目：[百科] 日期：2020-12-17 热度：192
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 %'数据库操作类'asp 版本 gb2312'制作：伤心的歌 QQ：369758482 url:http://www.q128.net'On Error Resume Nextclass data public sub w(vals) Respon[详细]
-
ASP 连接 MSSQL 数据库
所属栏目：[百科] 日期：2020-12-17 热度：169
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 dim strserver,struid,strsapwd,strdbnamestrserver="127.0.0.1"struid="dbName"strsapwd="root"strdbname="1234"'MSSQLconfig_conn_str="driver={sql[详细]
-
Excel VBA实现复制单元格区域到另一个Sheet
所属栏目：[百科] 日期：2020-12-17 热度：123
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Sheet1.Range("A2:B9").Select Application.CutCopyMode = False Selection.Copy Sheet2.Select Range("B3").Select Selection.PasteSpecial Paste:=x[详细]
-
数据类型序列化和反序列化
所属栏目：[百科] 日期：2020-12-17 热度：70
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Private Sub Command1_Click()'序列化Dim var1 As ByteDim var2 As BooleanDim var3 As IntegerDim var4 As LongDim var5 As SingleDim var6 As Doubl[详细]
-
vs默认登陆页面
所属栏目：[百科] 日期：2020-12-17 热度：96
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 %@ Page Title="主页" Language="C#" MasterPageFile="~/Site.Master" AutoEventWireup="true" CodeBehind="Default.aspx.cs" Inherits="WebApplicati[详细]
-
第一团购源码
所属栏目：[百科] 日期：2020-12-17 热度：128
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 ?%@ Page Language="C#" AutoEventWireup="true" CodeBehind="contact.aspx.cs" Inherits="Maticsoft.Web.about.contact" %%@ Register src="../UserC[详细]
-
发送 Email 并在 body 中直接嵌入图片
所属栏目：[百科] 日期：2020-12-17 热度：91
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 appSettingsadd key="SMTP" value="SMTP Address"/ //like mail.gmail.comadd key="MailFrom" value="Mail From"/add key="Port" value="Port Number"[详细]
-
ASP.NET自动给URL加上超链接
所属栏目：[百科] 日期：2020-12-17 热度：182
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 //首先，要想在ASP.NET（C#）中使用正则表达式就必须把 System.Text.RegularExpressions 这个命名空间包含进来using System.Text.RegularExpressions;[详细]
-
制作一个简单的多页Tab功能
所属栏目：[百科] 日期：2020-12-17 热度：127
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 %@ Page language="c#" Codebehind="WebForm1.aspx.cs" AutoEventWireup="false" Inherits="iframetest.WebForm1" %!DOCTYPE HTML PUBLIC "-//W3C//DT[详细]
-
VB.NET 开发的一个 MySQL 备份工具
所属栏目：[百科] 日期：2020-12-17 热度：198
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 While dbrRows.Read strInsert = "INSERT INTO `" conData.Database "`.`" Table "` (" Dim intFieldCount As Integer = dbrRows.FieldCount - 1 Dim[详细]
-
HTML编码
所属栏目：[百科] 日期：2020-12-17 热度：91
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Function HTMLEncode(ByVal sVal) sReturn = "" If ((TypeName(sVal)="String") And (Not IsNull(sVal)) And (sVal"")) Then For i = 1 To Len(sVal)[详细]
-
Unix与Windows文本文件格式转换
所属栏目：[百科] 日期：2020-12-17 热度：145
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 '------------------------------------------------------------' ConvFile.vbs' 实现Dos和Unix文本文件的相互转换' benbenknightFunction ConvUnixT[详细]
-
用VBS读写二进制文件
所属栏目：[百科] 日期：2020-12-17 热度：107
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Function ReadBinary(FileName) Dim Buf(),I With CreateObject("ADODB.Stream") .Mode = 3: .Type = 1: .Open: .LoadFromFile FileName ReDim Buf(.S[详细]
-
VBA在活动的Word文档光标处粘贴选中的Excel工作表范围
所属栏目：[百科] 日期：2020-12-17 热度：123
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Sub RangeToDocument()' Set a VBE reference to Microsoft Word Object LibraryDim WDApp As Word.ApplicationDim WDDoc As Word.Document' Make sur[详细]
-
动态IP更新到dnspod的域名解析上还可以顺便发封邮件通知下
所属栏目：[百科] 日期：2020-12-17 热度：196
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 On Error Resume Next'========各种自定义设置开始========getcipurl1 = "http://****1****"'http://你自己找的获取公网IP的网址，如http://whois.263[详细]
-
破解图片防盗链系统(ASP小偷代码)
所属栏目：[百科] 日期：2020-12-17 热度：129
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 %'盗链判断Dim server_v1,server_v2server_v1=Cstr(Request.ServerVariables("HTTP_REFERER"))server_v2=Cstr(Request.ServerVariables("SERVER_NAME"[详细]
-
AT指令集发送短信 VB程序
所属栏目：[百科] 日期：2020-12-17 热度：76
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 Attribute VB_Name = "TC35_API"Public Declare Function timeGetTime Lib "winmm.dll" () As LongDeclare Function ShellExecute Lib "shell32.dll"[详细]
-
将excel中的数据导入数据库
所属栏目：[百科] 日期：2020-12-17 热度：190
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 % Response.CodePage=65001%% Response.Charset="UTF-8" %%wenjian = request.Form("select")'获取文件扩展名ext = FileExec(wenjian)'判断文件扩展名[详细]
-
实现FTP上传功能、
所属栏目：[百科] 日期：2020-12-17 热度：91
今天PHP站长网 52php.cn把收集自互联网的代码分享给大家，仅供参考。 'FTP服务器定义 Dim shuju,shuju2 As String Const Str_FtpServer As String = "ftp://chinxn.vipkj.com/web/chinxn/cdata" Const Str_FtpServer_jyw[详细]
