Connessione in una stringa

[Nightmare-1]

ok allora posto tuto il codice delle pagine così scilgo ogni dubbio:

config.asp

<%	
connSR = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" &amp; server.MapPath("db.mdb")

sub open_conn()
	
	Set objConn=Server.CreateObject("ADODB.Connection")
	objConn.ConnectionString=connSR

	objConn.Open
end sub

sub close_conn()
	
	objConn.Close
	Set objConn=nothing
end sub
%>

index.asp

<%
call open_conn()

RecordsPerPagina = 15  
pagina = Request("pagina") 
if pagina="" or pagina="0" then pagina=1 
pagina2 = pagina 

set rs = Server.CreateObject("ADODB.Recordset") 
strRicerca = Request.form("select") 
rs.open "select * from ristoranti order by id desc", Conn, 1, 3

rs.PageSize = RecordsPerPagina

rs.AbsolutePage = pagina 
For i=1 to RecordsPerPagina 
if Not rs.EOF then 
%>



[img]images/sito/default/space.gif[/img]· "><%=rs("nome")%>


<% 
rs.MoveNext 
end if 
Next
%>
                



                <center>
<% 
Response.Write "Pagine:" 
For pagina=1 to rs.PageCount 
if cint(pagina) = cint(pagina2) then 
%>
                <font color="#FF0000">[<%=pagina%>]</font> 

<% 
else 
%> 
                [<%=pagina%>]

<% 
end if 
Next 
call close_conn()
%>
                </center>

Grazie anziutto per il tempo speso

[teorema55]

Come fai a usare la connessione

objConn

se nello script la chiami

conn

?

[Nightmare-1]

E' vero è dovuto alla distrazione. Il problema cmq non me lo dà al momento di eseguire lo script (me ne sarei comunque accorto) ma nel momento in cui creo il sub, quando dichiato connPath= "DRIVER tc etc", mi dà un errore di compilazione. Mentre se uso il sistema che usavo io, ovvero inserire la stringa di connessione direttamente nel sub open_conn, non me la importa nella pagina.\

[teorema55]

Io di solito uso
3,3
nell'apertura del rs, non
1,3

a perte questo, non so proprio cosa pensare...............

[Nightmare-1]

Ti giuro pagherei oro per sapere l'errore più che per il suo reale utilizzo

Comunque ti ringrazio moltissimo per l'aiuto ed il tempo che mi hai concesso, sei stato veramente gentile. Alla prossima