Ciao a tutti,
sto facendo un programmino del lotto in asp e lo provo localmente sul mio pc con win98 e pws. Fin qui,tutto funziona. Adesso ho acquistato un dominio dove posso utilizzare asp e database access ma non mi riesce far funzionare il mio programma. quando lo eseguo sulla barra indirizzi sembra mi aggiunga un www.miosito.it in piu'. vi faccio vedere il mio listato perche' non riesco proprio a capire se sbaglio qualcosa. Ciao e grazie
Quando pubblico il sito uso il mio portatile con winxp Home (no pws)
file numero_spia_def.asp:
<html>
<head>
<title>Calcolo numero spia</title>
</head>
<body>
<form name="numerospia" method="post" action="www.miosito.it/asp2.asp">
Estrazioni da considerare:<input type="text" name="n_estraz" size="2">
Numero spia da verificare:<input type="text" name="n_spia" size="1">
Routa:<select name="scelta" size=1">
<option value="BA" selected> BARI
<option value="CA"> CAGLIARI
<option value="FI"> FIRENZE
<option value="GE"> GENOVA
<option value="MI"> MILANO
<option value="NA"> NAPOLI
<option value="PA"> PALERMO
<option value="RM"> ROMA
<option value="TO"> TORINO
<option value="VE"> VENEZIA
<option value="NZ"> NAZIONALE
<option value="BA"> TUTTE
</option>
</select>
<input type="submit" name="invio" value="Calcola">
</form>
</body>
</html>
file asp2.asp
<%
' definizione recordset
Set objConn = Server.CreateObject("ADODB.Connection")
msgconn="Provider = Microsoft.Jet.OLEDB.4.0; Data Source = www.miosito.it/Estratti.mdb"
objConn.Open msgconn
sql = "SELECT * from Estratti"
Set objRs = Server.CreateObject("ADODB.Recordset")
objRs.open sql, objconn, 3,3
'posizionamento su ultimo record (ovvero record piu' recente)
objrs.movelast
nestraz = request.form("n_estraz")
nspia = request.form("n_spia")
ruotasc = request.form("scelta")
dim Estraz(90)
contatore = 0
'ciclo for per verificare il numero di estrazioni da controllare
for i=1 to nestraz
'sotto ciclo per scorrere tutte e 5 le estrazioni della ruota selezionata
for a=1 to 5
' verifico se il numero spia e' nell'estrazione
if objRs(ruotasc & a) = nspia then
contatore=contatore+1
end if
' calcola tutte le ripetizioni dei numeri
Estraz(objRs(ruotasc & a)) = Estraz(objRs(ruotasc & a)) +1
next
objRs.Moveprevious
next
response.write "
Numero estrazioni:" & nestraz
response.write "
Ruota di riferimento:" & ruotasc
response.write "
Numero spia:" & nspia
response.write "
Conta=" & contatore
for e=1 to 90
response.write("
N" & e & ":" & Estraz(e))
next
'chiusura del recordset
objRs.Close
Set objRs = Nothing
objConn.Close
Set objConn = Nothing
%>
quando lo eseguo mi scrive page not found e l'indirizzo http://www.miosito.it/miosito.it/TMPfnse5z4i83.asp
:master:
Grazie
Rispondi quotando
