shveicar
|
 Posted: Fri Jun 24, 2011 13:54 Post subject: пояснение скрипта |
 |
|
Здравствуйте - на странице 1 Volniy привел пример скрипта
| Code: | Dim fso, F
Set fso = CreateObject("scripting.filesystemobject")
F = WScript.Arguments(0)
Set F=fso.OpenTextFile(F, 2, True)
F.WriteLine("<html>")
F.WriteLine("<head>")
F.WriteLine("<title>Untitled</title>")
F.WriteLine("</head>")
F.WriteLine("<body>")
F.WriteBlankLines(1)
F.WriteLine("Hello World!")
F.WriteBlankLines(1)
F.WriteLine("</body>")
F.WriteLine("</html>")
Set F=Nothing
Set fso=Nothing
WScript.Quit |
создающего html файл
пытался изменить скрипт для создания html файла содержанием типа
| Code: | Dim fso, F
Set fso = CreateObject("scripting.filesystemobject")
F = WScript.Arguments(0)
Set F=fso.OpenTextFile(F, 2, True)
F.WriteLine("<html>")
F.WriteLine("<head>")
F.WriteLine("<META HTTP-EQUIV="Refresh" CONTENT="0; URL=spravka.chm">")
F.WriteLine("<title>open file</title>")
F.WriteLine("</head>")
F.WriteLine("</html>")
Set F=Nothing
Set fso=Nothing
WScript.Quit |
выскакивает ошибка- строка 13 символ 33 предпологается наличие объекта')' - что нужно исправить? Заранее благодарен. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
