How to convert the code in VBS or ASP into one sentence
This article mainly introduces how to convert the code in VBS or ASP into one sentence form, the article is very detailed, has a certain reference value, interested friends must read it!
It turns out that it is not possible to have TABLE.
Not even anything like if xx=1 then yy=2.
/ / this script supports drag and drop, or you can use cscript change.vbs xx.asp on the command line
The code is as follows:
On Error Resume Next
Set Arg=Wscript.Arguments
If Arg.Count=0 Then wscript.quit
'code by NetPatch
'enjoy it
Set Fso=CreateObject ("Scripting.FileSystemObject")
Set File=Fso.OpenTextFile (arg (0), 1 Magi Falsem muri 2)
Set Files=Fso.OpenTextFile (arg (0) & ".vbs", 2Jing True)
Do While File.AtEndOfStream True
SzBuf=File.readline
SzBuf=Replace (szBuf,chr (9), "")
Findnum=InStr (LCase (szBuf), "then")
If Findnum > 0 Then
Findnum=findnum+3
If Len (szBuf) > Findnum Then
SzBuf=szBuf& ": End If"
End If
End If
Files.Write szBuf& ":"
Loop
File.Close
Files.Close
Set Fso=Nothing
Wscript.echo "ok!"
The above is all the contents of the article "how to convert the code in VBS or ASP into one sentence". Thank you for reading! Hope to share the content to help you, more related knowledge, welcome to follow the industry information channel!