ASP и Apache 2

E-mail · Отправлено: **21:12, 19-02-2005** | #2

а чего иконки в сообщениях не работают?

vadimiron · Конфигурация компьютера

К сожелению, на данном форуме в частности и в мире вообще

очень мало специалистов по АСП (по сравнению с ПХП)
Так что единственное, что могу посоветовать, так это сайт: Apache-ASP

E-mail · Отправлено: **22:26, 19-02-2005** | #4

vadimiron
я буду первым))

если кто что подскажет по теме буду благодарен..

mar · Отправлено: **22:40, 19-02-2005** | #5

E-mail
сайт под ASP или ASP.net ? (вопрос чисто академический, я ни на том, ни на том никогда не писала

)
( довольно много программистов под ASP собрано на http://www.relib.com )

E-mail · Отправлено: **23:21, 19-02-2005** | #6

вот кусок кода странички индекс):

Код:

 <%Response.Expires = 0%><!-- #include virtual="/cont.asp" -->

<html>
<head>
<TITLE><%=(TitleContent)%></TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<meta http-equiv="keywords" content="">
<meta name="description" content="">
<meta http-equiv="pragma" content="no-cache">
<meta http-equiv="cache-control" content="no-cache">
<META NAME="REVISIT-AFTER" CONTENT="5 days">
<%=(BaseHref)%>

а вот кусок файла cont.asp :

Код:

<%Response.Expires = 0


Set objConnectionContent = Server.CreateObject("ADODB.Connection")
objConnectionContent.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Request.ServerVariables("APPL_PHYSICAL_PATH") & "..\db\content.mdb;"

sqlContent = "SELECT * FROM [Config] WHERE ID = 1"
Set objRecordsetContent  = Server.CreateObject("ADODB.Recordset")
objRecordsetContent.Open sqlContent, objConnectionContent, 3, 3
NewsInPreview = objRecordsetContent("NewsInPreview")
NewsInFull = objRecordsetContent("NewsInFull")
GBCount = objRecordsetContent("GbCount")
Bhref = objRecordsetContent("BaseHref")
pole = objRecordsetContent("KlychPole")
BaseHref = "<BASE href=http://" & Bhref & "/>"
Dim NamePriceColumn (20)

for plsc = 1 to 20
NamePriceColumn (plsc) = objRecordsetContent("PLS"&CStr(plsc))
next

objRecordsetContent.Close
Set objRecordsetContent = Nothing


sqlContent = "SELECT * FROM [FFM] WHERE FullNews = True"
Set objRecordsetContent  = Server.CreateObject("ADODB.Recordset")
objRecordsetContent.Open sqlContent, objConnectionContent, 3, 3
if objRecordsetContent.EOF Then
URLFullNews = ""
else
URLFullNews = objRecordsetContent("URL")
end if
objRecordsetContent.Close
Set objRecordsetContent = Nothing

sqlContent = "SELECT * FROM [FFM] WHERE URL = '" & Request.ServerVariables("URL") & "';"
Set objRecordsetContent  = Server.CreateObject("ADODB.Recordset")
objRecordsetContent.Open sqlContent, objConnectionContent, 3, 3
menulevel2id = objRecordsetContent("L2")
TitleContent = objRecordsetContent("Title")
Menu1Open = objRecordsetContent("Menu1Open")
FileLevel111 = objRecordsetContent("L1")
FSTNAW = objRecordsetContent("FSTNAW")
GBook = objRecordsetContent("GBook")
BANNER1 = objRecordsetContent("BANNER1")
RootTEXT = objRecordsetContent("RootTEXT")
PageNameURL = objRecordsetContent("URL")
ShowFNews = objRecordsetContent("FullNews")
ShowPrice = objRecordsetContent("PriceBlock")
ShowSearchPrice = objRecordsetContent("SearchPrice")
SiteMapBlock = objRecordsetContent("SiteMapBlock")

ADDRight = objRecordsetContent("ADDRight")


per = ""
gyafed = lcase(Request.ServerVariables("URL"))
gyafed = Replace(gyafed, "/", "\")
for j = 1 to len(gyafed)
aaa = mid(gyafed, j, 1)
if aaa = "\" Then
per = per & "000"
else
per = per & CStr(ASC(mid(gyafed, j, 1)))
end if
next

если мне ктонибудь скажет что это asp или asp net буду благодарен))..

Vlad Drakula · Конфигурация компьютера

E-mail
судя по синтаксису это всетаки асп а не асп.нет...

а о пчему именно под апачь???
что обязательно чтобы сервер был под линуксом?

E-mail · Отправлено: **21:50, 21-02-2005** | #8

дело не в синтаксе.
мне объяснили)

у аспнет расширение .aspx

Prisoner · Отправлено: **08:19, 22-02-2005** | #9

Ну, если не учитывать момент, что можно заставить и документы txt обрабатываться как скрипт. Вообще, расширение это слабая штука в уверенности, что есть контент файла.