本站提倡有节制游戏,合理安排游戏时间,注意劳逸结合。

【javascript push 源码】【付费下载 源码】【android源码 external】vbs 源码

2024-11-15 09:53:14 来源:休闲 分类:休闲

1.vbs获取网页源码
2.vbs是什么文件
3.求一个能自动运行的vbs源码,就是运行某一个程序就会自动运行。要简单一点的,举个例子就行。javascript push 源码
4.vbs代码举例

vbs 源码

vbs获取网页源码

       dim xp,url,MyStream

       url=inputbox("输入网址")

       if url&"a"<>"a" then

        set xhp=createobject("microsoft.xmlhttp")

        xhp.open "get",url,false

        xhp.send

        Set MyStream=CreateObject("Adodb.Stream")

        MyStream.Type = 1

        MyStream.Open

        MyStream.Write xhp.responseBody

        MyStream.SaveToFile "c:\xxx.html"

        Msgbox "保存成功!哈哈"

       end if

vbs是什么文件

       VBS是基于VisualBasic的脚本语言。VBS的全称是MicrosoftVisualBasicScriptEdition,用记事本就可以看到源代码,在没有语法错误的前提下,直接双击左键就可以运行。

       因为VBS较为简单可行性强,付费下载 源码所以很多人都喜欢利用VBS去写病毒或者整人的代码,所以在打开VBS之前要确保VBS的安全性和渠道的可信性。任何一种文本编辑器都可以用来开发VBS,记事本是windows系统自带的,无需专门下载安装,android源码 external更方便快捷。

求一个能自动运行的vbs源码,就是运行某一个程序就会自动运行。要简单一点的,举个例子就行。删除文件源码

       调用外部程序,不知道你说的是不是这个意思

set ws = createobject("wscript.shell")

       ws.run "notepad" '打开记事本程序

       打开Windows文件夹中的文件只填写文件名就可以了。其他地方的要填写完整路径,如:

set ws = createobject("wscript.shell")

       ws.run "d:\.exe" '打开D:\.EXE

       如果路径名中带有空格,需要三个引号,html生日源码如:

set ws = createobject("wscript.shell")

       ws.run """D:\Program Files\Tencent\QQ\Bin\QQ.exe"""

vbs代码举例

       矩形面积计算器代码如下:

       dim a,b,s

       a=inputbox("请输入矩形的长:")

       b=inputbox("请输入矩形的宽:");

       s=a*b

       msgbox (s)

       结束圆面积计算器代码如下:

       dim a,s

       a=inputbox("请输入圆的半径");

       s=a*a*3.

       msgbox(s)

       其他计算器,如圆周长计算器和长方体体积计算器等,大家可以参考这些代码自行编写。

       恶作剧代码示例:

       on error resume next

       dim WSHshellA

       set WSHshellA = wscript.createobject("wscript.shell")

       WSHshellA.run "cmd.EXE /c shutdown -r -t -c ""叫你不说,知道厉害了吧!"" ",0 ,true

       dim a

       do while(a > "我是猪")

       a = inputbox ("说我是猪,就不关机,快撒,说 ""我是猪"" ","说不说","不说",,)

       msgbox chr() + chr() + chr() + a,0,"MsgBox"

       loop

       msgbox chr() + chr() + chr() + "早说就行了嘛"

       dim WSHshell

       set WSHshell = wscript.createobject("wscript.shell")

       WSHshell.run "cmd.EXE /c shutdown -a",0 ,true

       msgbox chr() + chr() + chr() + "哈哈哈哈,真过瘾"

扩展资料

       VBScript(Microsoft Visual Basic Script Editon).,微软公司可视化BASIC脚本版). 正如其字面所透露的信息, VBS(VBScript的进一步简写)是基于Visual Basic的脚本语言。 我进一步解释一下, Microsoft Visual Basic是微软公司出品的一套可视化编程工具, 语法基于Basic. 脚本语言, 就是不编译成二进制文件, 直接由宿主(host)解释源代码并执行, 简单点说就是你写的程序不需要编译成。exe, 而是直接给用户发送。vbs的源程序, 用户就能执行了。

相关推荐
一周热点