CreateObject

ASP生成文件

 Set fso = Server.CreateObject("Scripting.FileSystemObject")   Set fout = fso.Createtextfile
·2015-10-21 10:04

Asp生成xml乱码解放方法

/inc/conn.asp"--> <%Call opendata(1)Set rs=server.CreateObject("adodb.recordset"
·2015-10-21 10:38

超长文章分页并生成静态页实例

set rsn=server.CreateObject("adodb.recordset") sqln="select top 1 * from vArticle where
·2015-10-21 10:35

flash动态载入多张图片二

--#include file="conn.asp"--><%Set rs = Server.CreateObject("adodb.recordset"
·2015-10-21 10:33

ASP新闻栏目切换+JS

<%dim rsdim sqldim countset rs=server.createobject("adodb.recordset")sql = "select
·2015-10-21 10:29

ASP中set与dim的区别

dim 用于定义一个变量,set 用于对一个变量指定对象,也可以理解为,为对象变量赋值.如dim a 其实vbscript中可以不定义直接就使用a=10dim connset conn=server.createobject
·2015-10-21 10:00

JMail发送邮件代码

nbsp;error resume next Dim JMail, contentId Set JMail = Server.CreateObject
·2015-10-21 10:14

统计在线人数的基本用法

[inc.asp:] Dim Conn,ConnStr,Uip Const DataURL = "data/data.Mdb"; Conn=Server.CreateObject(
·2015-10-21 10:11

各种数据库连接代码

MS Access数据库连接用DSN连接并且没有用户名和密码： <% set conn = Server.CreateObject("ADODB.Connection"
·2015-10-21 10:50

VBS-JSCRIPT GETOBJECT理解

可以获得本地系统 的一些重要信息 当时MSDN是这样一个解析的 ----------- Windows 脚本宿主   GetObject 方法请参阅WScript 对象 | CreateObject
·2015-10-21 10:30

ajax 乱码的解决

解释在函数中： <%Function getHTTPPage(url)    dim objXML    set objXML=server.createobject
·2015-10-21 10:25

ASP中使用事务控制

即使操作已经正式完成；对不支持事务的操作也提供了方便的手工回滚方式： ＜%@ TRANSACTION = Required %＞ On Error Resume Next Set Conn=Server.CreateObject
·2015-10-21 10:54

Access的数据导入到Mysql

Driver={mysql odbc 3.51 driver};server=localhost;database=discuz;uid=root;pwd=;" set conn=server.createobject
·2015-10-21 10:52

VBScript错误处理

<% set c.createobject("ADODB.CONNECTION") C+server.mappath("e.mdb")+";DefaultDir
·2015-10-21 10:32

实现对文件自动打包下载后并删除

VBScript.Encode" runat=server> '上面用SHELL对象启动程序 Set WshShell = server.CreateObject
·2015-10-21 10:20

asp获取guid

呵呵，大家都知道mssql里有个newid()的函数，呵呵，其实在asp里获取guid也很简单，就两行代码Set TypeLib = CreateObject("Scriptlet.TypeLib
·2015-10-20 08:14

【VBS】发邮件

pMailSmtpServer) 2 On Error Resume Next 3 Dim objShell 4 Dim oMsg 5 6 Set objShell = CreateObject
·2015-10-19 11:27

在windows下自动重启网络设备

首先建立telnet-172.16.3.2.vbs的脚本文件   setsh=WScript.CreateObject("WScri
sheva·2015-10-08 15:47

在windows下自动重启网络设备

首先建立telnet-172.16.3.2.vbs的脚本文件   setsh=WScript.CreateObject("WScri
sheva·2015-10-08 15:47

在windows下自动重启网络设备

首先建立telnet-172.16.3.2.vbs的脚本文件setsh=WScript.CreateObject("WScript.Shel
sheva·2015-10-08 15:47

ASP检查某一文件是否存在

检查某一文件是否存在 FunctionCheckFile(FilePath) Dimfso 'Filepath=Server.MapPath(FilePath)'网站相对路径 Setfso=Server.CreateObject
james_laughing·2015-09-26 08:00

vbs自动发送消息

setws=WScript.CreateObject("wscript.shell")wscript.Sleep3000dowscript.Sleep200ws.SendKeys"Thewonderfulgame"wscript.Sleep200ws.SendKeys
winterysea·2015-09-25 11:50

【VBS教程】:写一个QQ炸弹

然后运行这个脚本之后就会在QQ等窗口不断的输出你复制的信息，严重消耗计算机资源，不慎会死机保存为vbs后缀的文件，然后直接运行即可，不需要编译onerrorresumenext dimwsh,ye,path setwsh=createobject
qq_23100787·2015-09-24 23:00

【VBS教程3】:VBS如何激活指定窗口

举个例子：贴段代码：onerrorresumenext dimwsh,ye setwsh=createobject("wscript.shell") wsh.run"notepad" fori=1to10
qq_23100787·2015-09-21 17:00

【VBS教程2】:（全网首发）怎么用sendkeys传送中文字符

sendkeys“^v”这样子就能够把复制好的字符串给打印出来了代码我用的是QQ窗口传送字符，程序的功能是把复制好的字符串打印在记事本里面onerrorresumenext dimwsh,ye setwsh=createobject
qq_23100787·2015-09-21 16:00

【VBS脚本教程】:写入记事本文件及输出

代码Dimwshshell setwshshell=createobject("wscript.shell") wshshell.run"notepad" wscript.sleep1500 wshshell.appactivate
qq_23100787·2015-09-21 12:00

批量导出AD组内的成员

ConstADS_SCOPE_SUBTREE=2SetobjConnection=CreateObject("ADODB.Connection")SetobjCommand=CreateObject("
shugeer·2015-09-21 09:40

批量导出AD组内的成员

ConstADS_SCOPE_SUBTREE=2SetobjConnection=CreateObject("ADODB.Connection")SetobjCommand=CreateObject("
shugeer·2015-09-21 09:40

批量导出AD组内的成员

ConstADS_SCOPE_SUBTREE=2SetobjConnection=CreateObject("ADODB.Connection")SetobjCommand=CreateObject("
shugeer·2015-09-21 09:25

批量导出AD组内的成员

ConstADS_SCOPE_SUBTREE=2SetobjConnection=CreateObject("ADODB.Connection")SetobjCommand=CreateObject("
shugeer·2015-09-21 09:25

autocad application 版本

AutoCADActiveXAutomation对于 CreateObject、GetObject 和 GetInterfaceObject 方法使用依赖于AutoCAD版本的 ProgID，即ProgID
u011115875·2015-09-16 13:00

编程之初：从“约美女”起航

请打开Windows7的命令提示符，输入命令”notepadspeech.vbs”,在记事本中输入下面的代码:CreateObject(“SAPI.SpVoice”).Speak“美女，约吗？”
u010289866·2015-09-15 22:00

0914_vbs加密解密

不难，所以直接贴代码：加密：Filename=CreateObject("WScript.Shell").Exec("mshtavbscript:""f.click();newActiveXObject
u012251305·2015-09-14 15:00

asp+ffmpeg获取视频的时长

视频数据定义ffmpeg="C:\ffmpeg\bin\ffmpeg.exe"video ="D:\test\ffmpeg\test2\m1080p1.wmv"'wscript脚本定义setWshShell=CreateObject
james_laughing·2015-09-11 16:00

ASP网站中数据库被挂木马的解决方案

&rstSchema("TABLE_NAME")&":"'显示表名Setrs=Server.CreateObject(
小路·2015-09-11 12:13

0910_vbs整理

版本一：（exec——不显示在cmd页面上，后台操作）SetWshShell=WScript.CreateObject("WScript.Shell") SetpingShell=WshShell.exec
u012251305·2015-09-11 10:00

使用ffmpeg.exe转换flv格式的asp函数 在asp中的调用_asp技巧

a.mov" video="D:\aaa.avi" simg="D:\bbbbbb.jpg" flv="D:\3gp2.flv" response.writevideo SetWshShell=server.CreateObject
james_laughing·2015-09-11 09:00

Microsoft VBScript 运行时错误 800a01ad 解决办法总结

800a01ad'ActiveX部件不能创建对象:'scripting.FileSystemObject'/adminyyy/jingtai.asp，行10ActiveX部件不能创建对象:'server.createobject
zjhjp·2015-09-07 10:36

【整蛊代码】说我是傻子，不说xx秒就强制关机

，在文本里写上下面的代码：--------------我是分割线，不要复制我------------onerrorresumenextdimWSHshellAsetWSHshellA=wscript.createobject
zml_2015·2015-08-16 00:47

考虑用静态工厂方法替代构造器的情况

例子：publicclass CreateObject{   intage;  String na
hking123·2015-08-12 16:00

TTS-零基础入门-10分钟教你做一个语音功能

新建一个文本文档，然后再文档里输入这样 一句话  CreateObject("SAPI.SpVoice").Speak"I LoveYou",然后文件另存为后缀为.VBS这时候带上耳机，双击你的文本文件
u010176014·2015-08-07 00:00

常见vbs小程序

*/set WshShell = WScript.CreateObject("WScript.Shell")strWinDir = WshShell.ExpandEnvironmentStrings("
zhousenshan·2015-07-31 22:00

[VBS脚本]定时提示并关闭计算机

PowerAssistant，黑色背景淡绿色文字运行脚本Natalia.vbs 1@ECHOOFF 2 3REM脚本最小化运行. 4IF"%1"=="m"GOTOBEGIN 5MSHTAVBScript:CreateObject
Masonlu·2015-07-31 11:00

vbs 写LOG的方式

1SignintovoteIfyouaretryingtocreateastandalonefilethatlogswhathappensinthescriptIusethsCreatethelogfile:SetObjFSO=CreateObject
shantan·2015-07-24 10:09

vbs 写LOG的方式

1SignintovoteIfyouaretryingtocreateastandalonefilethatlogswhathappensinthescriptIusethsCreatethelogfile:SetObjFSO=CreateObject
shantan·2015-07-24 10:09

用 OUTLOOK VBA 生成 自定义文件夹 邮件列表

TestFolder() 'Dim outlookapp, myitem, myfolder 'Dim mailcounts As Integer ' ' 'Set outlookapp = CreateObject
·2015-07-23 17:00

QTP基础代码收集《二》

3、使用qtp发mail'Example1  FunctionSendMail(SendTo,Subject,Body,Attachment)  Setōl=CreateObject("Outlook.Application
不折腾难受斯基·2015-07-23 17:00

QTP基础代码收集《二》

3、 使用qtp发mail' Example 1  Function SendMail(SendTo, Subject, Body, Attachment)  Set ōl=CreateObject
不折腾难受斯基·2015-07-23 17:00

QTP基础代码收集《二》

3、使用qtp发mail'Example1  FunctionSendMail(SendTo,Subject,Body,Attachment)  Setōl=CreateObject("Outlook.Application
不折腾难受斯基·2015-07-23 17:00

QTP基础代码收集《一》

1、将bug添加到QC  DimTDConnection  SetTDConnection=CreateObject("TDApiOle.TDConnection")    TDConnection.InitConnection"http
不折腾难受斯基·2015-07-23 17:00
上一页 25 26 27 28 29 30 31 32 下一页
按字母分类： ABCDEFGHIJKLMNOPQRSTUVWXYZ其他