第3页_inputbox - 程序员之家

用VBScript实现的XP序列号替换器

2020-02-16 标签:vbs,实现,xp,序列号,替换,代码,如下,error,resume,next,dim,vol,prod,key,wscript,arguments,count,inputbox

实现代码如下：ON ERROR RESUME NEXT Dim VOL_PROD_KEY if Wscript.arguments.count 0 thenWscript.echo "替换失败！您输入的序列号有误。"Err.Clearend if Next

VB

VBScript基础编程教程 (第3篇)

2020-02-16 标签:vbs,基础,编程,教程,第三,首先,我来,解决,上次,课程,几个,疑问,余数,问题,16

第三篇（共六篇）：首先, 我来解决一下上次课程的几个疑问第一, 那个余数问题, 16 / 5 = 3...1, 是因为我改过前面的部分, 后面的忘了改了, 不好意思.第二, 请看一下程序清单:1)Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输

首页

N年前的两个脚本%5c暴库

2020-02-16 标签:n,年前,脚本,c,暴库,dim,xstatus,tstatus,vserver,vheader,vrsbody,geterror,inputbox,输入,网站,例如,http,www

Dim xStatus,tStatus,vServer,vHeader,vRsBody GetError=InputBox("请输入网站,例如:http://www.hackerxfiles.com/files/list.asp?id=415","请输入网址","http://www.hackerx

VB

VBScript编程教程 (第6篇)

2020-02-16 标签:vbs,编程,教程,一篇,新家,不错,mm,开心,跟着,高兴,今天,学习,基础,部分,自定义,函数,过程

最后一篇：新家不错, MM开心, 我也就跟着高兴了 : ), 今天我们学习基础篇的最后一个部分:自定义函数和过程. 我们每天都在和函数打交道, inputbox()是函数, msgbox()是函数, int()也是函数...这些函数都是系统内建的, 我们只能用不能改. 今天, 我就教大家怎样自己制

VB

VBScript编程教程 (第3篇)

2020-02-16 标签:vbs,编程,教程,第三,首先,我来,解决,上次,课程,几个,疑问,余数,问题,16

第三篇（共六篇）：首先, 我来解决一下上次课程的几个疑问第一, 那个余数问题, 16 / 5 = 3...1, 是因为我改过前面的部分, 后面的忘了改了, 不好意思.第二, 请看一下程序清单:1)Dim a,b,ca=inputbox("a是:","输入半径")b=Inputbox("b是:","输

VB

用VBScript可执行程序+Xmlhttp下载备份网上文件的代码

2020-02-16 标签:vbs,可执行,程序,xmlhttp,下载,备份,网上,文件,代码,今天,突然,想到,做一个,网站,上的,数据库,本地,机上,简单,做成

今天写程序时突然想到做一个文件的备份，把网站上的数据库备份到本地机上。一个简单的小程序，做成可执行的文件，用VBS最简单方便了。 'On Error Resume NextDim iRemote,iLocaliRemote = InputBox("请输入远程文件路径：")Set xPost = Cr

VB

用VBScript实现cmd功能

2020-02-16 标签:vbs,实现,cmd,功能,error,resume,n,ext,d,520,inputbox,输入,命令,多个,连接,关闭,vb,窗口,set

on error resume next do while d<>"520" d=inputbox("请输入命令,多个命令用&连接。关闭该VB窗口命令520") set q=createobject("scripting.filesystemobject") set a=WScr

与 inputbox 相关的软件列表