Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблема с ASP кодом / 8 сообщений из 8, страница 1 из 1
04.10.2006, 08:31
    #34030419
Scorpion1
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
Доброе утро.
Я давно пишу программы на VB. Но разрабатывать Web приложения с применением ASP (не ASP.NET) это моя первая прогамма. Решил задать здесь на форуме по VB т.к. чисто по ASP форума сдесь нет, а больше всего ASP похож на VB. Написал вот такой ASP-сценарий:

<HTML>
<HEAD>
<TITLE>Суточные данные</TITLE>
</HEAD>
<BODY bgcolor="FFFFCC">
<br>

<%
Dim myDLL
Dim myArray
Dim pDay
Dim pMonth
Dim pYear
Dim ddate
Dim i
Dim ft

pDay = right(Request.Form("day"),2)
pMonth = right(Request.Form("month"),2)
pYear =Request.Form("year")

//ddate= day & " " MonthName(CLng(month)) & " " & year

Set myDLL = Server.CreateObject("aiv_Pogr.Pogr")
myArray = myDLL.XLSInput("=", pDay, pMonth, pYear, "d:\AIV")
%>
<H3>АРМ "Анализ использования вагонов"</H3>
<H4>Справки по использованию вагонов под погрузку за : <b><% Response.Write(ddate) %></b></H4>
<br>
<HR>
<% for i=0 to 13
ft="spravki/" & Response.Write(myArray(i)) %>
<a href=ft><% Response.Write(myArray(i)) %> </a><br>
<% next %>
<br>
<HR>
</BODY>
</HTML>

При обращении выдает ошибку 500 - внутренная ошибка Internet Explorer.

Что-бы это значило?
Еще посмотрите пожалуйста правельно ли я написал формирование ссылки на файл (выделленно красным) чтото я сомневаюсь.
Сдесь в программе идет обрашение к DLL aiv_Pogr которую я написал для выборки данных из базы данных.
...
Рейтинг: 0 / 0
04.10.2006, 12:26
    #34031178
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
//ddate= day & " " MonthName(CLng(month)) & " " & year

проверь // это ремарки для JavaScript нужно '
...
Рейтинг: 0 / 0
04.10.2006, 13:06
    #34031347
Scorpion1
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
нет // это я просто закоментировал пока эту строку. Я не могу понять что за ошибка 500 у Internet Explorer-а. Посмотрите мой код я совневаюсь в нем. Особенно где ссылка красным. У меня в программе DLL берет из базы данные за определенные сутки и формирует файлы Excel и сажает все 14 файлов в подкаталог Spravki\ - виртуальной папки. Затем в массив myArray -возвращаются имена этих файлов типа Pogr_DN_n_ddmmgg.xls где n-номер от 1 до 14 , ddmmgg-день,месяц и год справки (например 150906). Теперь просто необходимо сделать ссылку на эти файлы, чтобы пользователь щелкнул по этой ссылке и смог загрузить этот файл. Саму DLL я проверял работает нормально. Вот такая у меня задача.
...
Рейтинг: 0 / 0
04.10.2006, 13:20
    #34031429
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
попробуйте так

Код: plaintext
1.
2.
3.
<% for i= 0  to  13 
Response.Write("<a href=" & "spravki/" & myArray(i) & ">" & myArray(i)) & "</a><br>")
next %>
...
Рейтинг: 0 / 0
04.10.2006, 14:00
    #34031646
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
1. Установки для IIS и виртуальной директории правильные ???
2. Если права для записи через asp в нужные директории ???
...
Рейтинг: 0 / 0
04.10.2006, 14:12
    #34031716
Azeke
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
HandKot -спасибо за идею очень своевременно. Но всеравно при обращении к этому сценарию Internet explorer выдает 500 ошибку. Что за ошибка и где не пойму.
...
Рейтинг: 0 / 0
04.10.2006, 14:12
    #34031718
michael R
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
ft="spravki/" & Response.Write(myArray(i)) %>

что это за странный код
в переменую загнать результат вывода ??????????
...
Рейтинг: 0 / 0
04.10.2006, 14:46
    #34031880
HandKot
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Проблема с ASP кодом
AzekeHandKot -спасибо за идею очень своевременно. Но всеравно при обращении к этому сценарию Internet explorer выдает 500 ошибку. Что за ошибка и где не пойму.

отключите на время работу с массивом

сделайте так

Код: plaintext
1.
2.
3.
<% for i= 0  to  13 
Response.Write("<a href=" & "spravki/" & Str(i) & ">" & Str(i)) & "</a><br>")
next %>

если отработает, то вероятно проблема что массив не формируется, либо выходите за пределы массива
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблема с ASP кодом / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]