scusami ma non sto capendo dove sbaglio

questa è la prima pagina dove definisco la variabile
codice:
<%
function inserimento()

Set Conn=Server.CreateObject("ADODB.Connection")
strConn="driver={Microsoft Access Driver (*.mdb)}; "
strConn=strConn & " DBQ=" & Server.MapPath("db.mdb")
Conn.Open (strConn)
Set rs = Server.CreateObject("ADODB.Recordset")
rs.open "tabella", conn,3,3

RS.addnew
Rs.Fields("a1")=a1
Rs.Fields("a2")=a2
Rs.update

counter=0
i=0
do
i=instr(i+1,varstring,vbcrlf)
if i>0 then counter=counter+1
loop until i=0

session("prova")=1 

'Chiusura database - recordset
rs.close
set rs=nothing
conn.close
set conn=nothing

'mando alla seconda pag
response.redirect "pag.asp"

end function
%>
questa è la seconda pagina dove la controllo

codice:
<%
If session("prova")=1 then
response.write "ok"
else
response.write "no"
end if

%>
ho provato anche a cambiare spazi e cose varie ma non mi viene mai presa

Ti vorrei anche aggiungere un'altra domanda posso richiamare una variabile session in un file incluso nella famosa seconda pagina?
Grazie ancora