Никак не могу понять, давно уже мучаюсь.
Есть файл aspx:
Код: Выделить всё
<%@ Page language="c#" Codebehind="MeetingProp.aspx.cs" AutoEventWireup="false"
Inherits="Meeting.MeetingProp" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<HTML>
<HEAD>
<title>Совещание</title>
<meta content="Microsoft Visual Studio .NET 7.1" name="GENERATOR">
<meta content="C#" name="CODE_LANGUAGE">
<meta http-equiv="Pragma" content="no-cache">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
<SCRIPT language="VBScript">
<!--
Private Function AppOpen(strFileName)
strFileName = Chr(34) + strFileName + Chr(34)
Dim WShell, ErrCode
Set WShell = CreateObject("WScript.Shell")
ErrCode = WShell.Run(strFileName)
Set WShell = Nothing
End Function
//-->
</SCRIPT>
</HEAD>
<body MS_POSITIONING="GridLayout">
...............
<DIV style="COLOR: blue; TEXT-DECORATION: underline"
onclick="AppOpen('C:\Проба.doc')">C:\Проба.doc</DIV>
.....При выполнении функции AppOpen() пишет, что не может создать объект WScript.Shell.
Проводил разные эксперименты и выяснил:
Если сохранить страницу локально и открыть ее, то выходит такая же ошибка,
НО, если открыть ее в блокноте и удалить перевод строки перед тэгом <HTML>,
т.е. переместить на предыдущую строку, и потом повторно выполнить с диска, то все работает четко!!!
Скрипт пробовал писать на разных языках, по-разному вызывал эту функцию, использовал разные объекты в ней,
но результат всегда один и тот же!!!
Пробовал заменить первые строки страницы на:
Код: Выделить всё
<% Response.Write("<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\" ><HTML>"); %>- но тэг <HTML> все равно начинается с новой строки, т.е. ничего не поменялось.
Проверял на IE6 с последними обновлениями, других к сожалению нет.
Что посоветуете?
Заранее спасибо
ops: