Newsgroup: it.comp.appl.access
Titolo: spazio web gratuito che supporti asp

 
ciao a tutti,
è un bel pò che non scrivevo e adesso ho iniziato un nuovo percorso.
con gli esempi che ho trovato su accessgroup ho creato un piccolo sito 
di prova per test vari.
il mio primo problema non si è fatto attendere
tiscali non supporta asp.
sapete consigliarmi un servizio free che supporti asp??
grazie a tutti 

 ha
scritto:

www.somee.com
MAssimiliano
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 ha scritto nel messaggio news:435f47a2$0$8495$5fc...@news.tiscali.it...

Prova questi:
http://www.jockersoft.altervista.org/hosting_gratuito.php
Ciao.
-- 
Sergio MAZZA 

 
come sempre grazie a voi inizio il mio lungo cammino verso l'asp
ho avuto spazio web da questo sito
http://www.domaindlx.com/
ma iniziano da subito i problemi
quasi di sicuro non mi connette il db
il codice che frontpage ha creato automaticamente è questo
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; 
charset=windows-1252">
<META NAME="Generator" CONTENT="Microsoft FrontPage 5.0">
</HEAD>
<BODY>
<FONT SIZE=2><P>&lt;SCRIPT LANGUAGE=VBScript RUNAT=Server&gt;</P>
<P>Sub Application_OnStart</P>
<P>&#9;'==FrontPage Generated - startspan==</P>
<P>&#9;Dim FrontPage_UrlVars(1)</P>
<P>&#9;'--Project Data Connection</P>
<P>&#9;&#9;Application("database1_ConnectionString") = 
"DRIVER={Microsoft Access Driver 
(*.mdb)};DBQ=URL=fpdb/database1.mdb"</P>
<P>&#9;&#9;FrontPage_UrlVars(0) = "database1_ConnectionString"</P>
<P>&#9;&#9;Application("database1_ConnectionTimeout") = 15</P>
<P>&#9;&#9;Application("database1_CommandTimeout") = 30</P>
<P>&#9;&#9;Application("database1_CursorLocation") = 3</P>
<P>&#9;&#9;Application("database1_RuntimeUserName") = ""</P>
<P>&#9;&#9;Application("database1_RuntimePassword") = ""</P>
<P>&#9;'--</P>
<P>&#9;Application("FrontPage_UrlVars") = FrontPage_UrlVars</P>
<P>&#9;'==FrontPage Generated - endspan==</P>
<P>End Sub</P>
<P>Sub Session_OnStart</P>
<P>&#9;FrontPage_StartSession '==FrontPage Generated==</P>
<P>End Sub</P>
<P>Sub FrontPage_StartSession</P>
<P>&#9;On Error Resume Next</P>
<P>&#9;if Len(Application("FrontPage_VRoot")) &gt; 0 then Exit Sub</P>
<P>&#9;</P>
<P>&#9;sFile = "global.asa"</P>
<P>&#9;sRootPath = Request.ServerVariables("APPL_PHYSICAL_PATH")</P>
<P>&#9;if Left(sRootPath,1) = "/" then sSep = "/" else sSep = "\"</P>
<P>&#9;if Right(sRootPath,1) &lt;&gt; sSep then sRootPath = sRootPath 
&amp; sSep</P>
<P>&#9;sRootPath = sRootPath &amp; sFile</P>
<P>&#9;</P>
<P>&#9;' discover the VRoot for the current page;</P>
<P>&#9;' walk back up VPath until we match VRoot</P>
<P>&#9;Vroot = Request.ServerVariables("PATH_INFO")</P>
<P>&#9;iCount = 0</P>
<P>&#9;do while Len(Vroot) &gt; 1</P>
<P>&#9;&#9;idx = InStrRev(Vroot, "/")</P>
<P>&#9;&#9;if idx &gt; 0 then</P>
<P>&#9;&#9;&#9;Vroot = Left(Vroot,idx)</P>
<P>&#9;&#9;else</P>
<P>&#9;&#9;&#9;' error; assume root web</P>
<P>&#9;&#9;&#9;Vroot = "/"</P>
<P>&#9;&#9;end if</P>
<P>&#9;&#9;if Server.MapPath(Vroot &amp; sFile) = sRootPath then exit 
do</P>
<P>&#9;&#9;if Right(Vroot,1) = "/" then Vroot = 
Left(Vroot,Len(Vroot)-1)</P>
<P>&#9;&#9;iCount = iCount + 1</P>
<P>&#9;&#9;if iCount &gt; 100 then</P>
<P>&#9;&#9;&#9;' error; assume root web</P>
<P>&#9;&#9;&#9;Vroot = "/"</P>
<P>&#9;&#9;&#9;exit do</P>
<P>&#9;&#9;end if</P>
<P>&#9;loop</P>
<P>&#9;' map all URL= attributes in _ConnectionString variables</P>
<P>&#9;Application.Lock</P>
<P>&#9;if Len(Application("FrontPage_VRoot")) = 0 then</P>
<P>&#9;&#9;Application("FrontPage_VRoot") = Vroot</P>
<P>&#9;&#9;UrlVarArray = Application("FrontPage_UrlVars")</P>
<P>&#9;&#9;for i = 0 to UBound(UrlVarArray)</P>
<P>&#9;&#9;&#9;if Len(UrlVarArray(i)) &gt; 0 then 
FrontPage_MapUrl(UrlVarArray(i))</P>
<P>&#9;&#9;next</P>
<P>&#9;end if</P>
<P>&#9;Application.Unlock</P>
<P>End Sub</P>
<P>Sub FrontPage_MapUrl(AppVarName)</P>
<P>&#9;' convert URL attribute in conn string to absolute file 
location</P>
<P>&#9;strVal = Application(AppVarName)</P>
<P>&#9;strKey = "URL="</P>
<P>&#9;idxStart = InStr(strVal, strKey)</P>
<P>&#9;If idxStart = 0 Then Exit Sub</P>
<P>&#9;strBefore = Left(strVal, idxStart - 1)</P>
<P>&#9;idxStart = idxStart + Len(strKey)</P>
<P>&#9;idxEnd = InStr(idxStart, strVal, ";")</P>
<P>&#9;If idxEnd = 0 Then</P>
<P>&#9;&#9;strAfter = ""</P>
<P>&#9;&#9;strURL = Mid(strVal, idxStart)</P>
<P>&#9;Else</P>
<P>&#9;&#9;strAfter = ";" &amp; Mid(strVal, idxEnd + 1)</P>
<P>&#9;&#9;strURL = Mid(strVal, idxStart, idxEnd - idxStart)</P>
<P>&#9;End If</P>
<P>&#9;strOut = strBefore &amp; 
Server.MapPath(Application("FrontPage_VRoot") &amp; strURL) &amp; 
strAfter</P>
<P>&#9;Application(AppVarName) = strOut</P>
<P>End Sub</P>
<P>&lt;/SCRIPT&gt;</P>
<P>&lt;head&gt;&lt;title&gt;Impostazioni Web per pagine 
ASP&lt;/title&gt;&lt;/head&gt;</P></FONT></BODY>
</HTML>
qualcuno può aiutarmi
grazie mille 

 grazie mille
Direi che qui siamo OT, c'è un NG apposito per ASP che è it.comp.www.asp; ma comunque se non descrivi neanche l'errore che ti 
presenta sarà difficile che riusciamo ad indovinarlo. Almeno indica l'indirizzo web per verdelo st'errore!
Ciao.
-- 
Sergio MAZZA 

 ha scritto nel messaggio 
news:djntmr$l7c$1...@area.cu.mi.it...

grazie mille mi sposto di la