Прежде всего, я начинаю начинать, когда речь заходит о VBscripts. У меня есть только один файл asp, написанный на VB, который запускает командный файл. Дело в том, что я хочу что-то, что указывает на то, что страница загружается как gif. Пакет занимает почти 10 минут, и я получаю пустую страницу, пока она не будет финиширована.Показать gif перед тем, как появится страница
Это весь мой код
<%@ Language = VBScript %>
<HTML>
<script runat="server" language=VBScript>
' The batch file is running here
Dim myExecutor
Dim commandline
commandline = "cmd.exe /c C:\test.bat "
Set myExecutor = Server.CreateObject("WScript.Shell")
myExecutor.Run commandline,0,true
Set myExecutor = Nothing
Response.Write "The batch run is finnished <p> "
</script>
<body>
The batch is loading. <!--renders after batch is finnished :/ -->
</body>
</HTML>
Я попытался запустить событие OnClick <asp:Button Text="Click here" OnClick="run_batch" runat="server"/>
, но дает мне ошибку 500 страниц, когда я использую sender As Object, e As EventArgs
в качестве параметров, вероятно, потому что я не имею классы и только runns все в один файл asp.
Спасибо.
Ваш код работает, но я могу запустить файл .hta без приглашения, чтобы скачать или запустить его? Chrome просто загружает файл .hta. Я хочу запустить его в браузере. – roYal
У меня нет настройки веб-сервера на моей машине, поэтому я создал .hta. Вы должны просто взять подход из этого кода и применить его к своему оригинальному скрипту. – FloatingKiwi
Я запускаю это из визуальной студии с локальным IIS. Кажется, я могу запускать .hta explorer и другие браузеры загружать только файл. . Кажется, это своего рода интернет-исследователь. – roYal