vbscript怎样去年换行

dim intret
intret = 2
if intret=6 then
location.href="http://www.google.com/"
elseif intret =7 then
location.href="http://www.baidu.com/"
end if

请问怎样把上面语句写到一行里面，能正解执行的，js分号就可以了，vbscript要怎么写呢？

[解决办法]
冒号。

VBScript code

dim intret:intret =6:if intret=6 then:a="http://www.google.com/":else:if intret =7 then:a="http://www.baidu.com/":End if:end if:MsgBox a