Problemi Con Asp-non Conosco Asp

[diegosky]

qualcuno che mi aiuti a capire la logica di questo codice
In particolare session("oRsTemp")("durataSS") come vengono definiti
GRAZIE A TUTTI

'ver 2.0 12/9 ' 12/9
Public Function DIS_dblTempDissSingoloSAP(lngSapCod,dblSapPeso)

dim DurataDiss
dim TipoDiss

session("oRsTemp").Filter = "rsrcod=" & lngSapCod
dblTempDissSingoloSAP = 0
Do While Not session("oRsTemp").EOF

'inserita scelta tra durata e duratass
'se h24=s or tipodiss<>a duratass else durata

TipoDiss=TRA_strTipologiaGuasto(session("oRsTemp") ("dataape"),session("oRsTemp")("datachi"))

'If (Session("FLGH24") = "S") OR ( TipoDiss <>"A") then
If ( TipoDiss <>"A") then
DurataDiss=session("oRsTemp")("durataSS")
'response.Write " DurataDiss " & DurataDiss
else
DurataDiss=session("oRsTemp")("durata")
end if

dblTempDissSingoloSAP = CalcolaSconSisu(session("oRsTemp")("guacod"), session("oRsTemp")("anno"), session("oRsTemp")("sdfcod"),DurataDiss, dblSapPeso,session("oRsTemp")("dataape"), session("oRsTemp")("datachi"))


if(session("oRsTemp")("sdfcod") > 0) then
session("TempDiss")=session("TempDiss") + dblTempDissSingoloSAP
session("TempDissBck")=session("TempDissBck") + dblTempDissSingoloSAP
else
session("TempDissBck")=session("TempDissBck") + dblTempDissSingoloSAP
end if
session("oRsTemp").MoveNext
Loop

session("oRsTemp").filter=""
if not session("oRsTemp").BOF then
session("oRsTemp").movefirst
end if
End Function

[cavicchiandrea]

Sicuro che sia ASP al 100%?
Non sembrebbe come sintassi, io non l'ho mai vista ma potrei sbagliarmi

[optime]

è asp, una funzione presa chissà dove. l'autore della funzione potrà ben spiegarti a cosa serve.

[diegosky]

Putropppo la funzione e' un'estratto di un codice di scritto 8 anni fa e non c'e nessuno che possa aiutarci .

[optime]

l'estratto è un estratto. bisognerebbe conoscere tutto il progetto per studiarlo. certo, non è un compito che possa affronare uno che (come da titolo) "non conosce asp"

[diegosky]

Speravo in un aiutino .....vabbe'

[optime]

mettiti nei nostri panni, come si fa a capire con quelle poche righe che hai postato?

[diegosky]

Sono 1565 righe il codice completo ....mi sa troppe pure da allegare

[optime]

se hai tutta una procedura da capire e manutenere, usciamo un po' dagli ambiti del forum, imho...

[diegosky]

Comunque la procedura non la devo modificare ma capire le relazioni con la base dati
Perche' estrare dei dati incongruenti

ciao