Ragazzi in una pagina common.asp ho personalizzato questo codice:
codice:
<%
'INIZIO IMPOSTAZIONI ******************
session.LCID = 1040
dbPath = server.mapPath("\attex\liste.mdb")
dbConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& dbpath
'FINE IMPOSTAZIONI *******************
sub elencoGiocatori(objConn,byRef elencoGiocatoriOutput)
sql = "SELECT * FROM segreterie order by conta"
set rs = server.createObject("ADODB.Recordset")
rs.open sql, objConn, 1, 3
if not rs.eof then
v = 0 'Contatore giocatori
ReDim elencoGiocatoriOutput((rs.recordCount-1),3)
do while not rs.eof
elencoGiocatoriOutput(v,0) = rs("conta")
elencoGiocatoriOutput(v,1) = rs("descr")
elencoGiocatoriOutput(v,2) = rs("media")
v = v + 1
rs.moveNext
loop
end if
rs.close
set rs = nothing
end sub
richiamato in questa pagina default.asp
codice:
<%
call dbConnect(conn,dbConnString)
call elencoGiocatori(conn,elencoGiocatoriOutput)
call dbDisconnect(conn)
%>
ma mi da :
Tipo di errore:
Errore di run-time di Microsoft VBScript (0x800A000D)
Tipo non corrispondente: 'elencoGiocatori'
Perchè secondo voi?