function med Recordeset

Går detta?

Call LoadList("SELECT ...")

IF NOT rsList.EOF THEN
	DO UNTIL rsList.EOF
		Call BuildAd(rsList)
		rsList.MOVENEXT
	LOOP
END IF

function BuildAd(???)

Som Ni ser så vill jag skicka in ett RecordSet till funktionen.

Är detta nåt som är möjligt?

Mvh

Pär

Jadå, det är bara skicka in objektet som ett argument till funktionen, precis som du gjort.

Sedan tar du emot det såhär:

function BuildAd(rsObject)

end function

rsObject är sedan objektet som du skickar med som argument. Alla metoder och egenskaper för objektet finns också tillgängliga såklart.

Ja, det är möjligt.

Vad är frågan?

@nders skrev:

Ja, det är möjligt.

Vad är frågan?

Ja du, vad är frågan nu när jag ser svaret. Jag trodde ett tag att jag fick lov att deklarera att det är ett objekt jag skulle ta emot i funktionen. Och sen visste jag inte om funktionen kunde ta emot ett Recordset.

Tack Troxy för hjälpen!
Allt är solklart nu!

Mvh

Pär

Troxy skrev:

Jadå, det är bara skicka in objektet som ett argument till funktionen, precis som du gjort.

Man behöver faktiskt inte ens skicka med det som ett objekt i VBScript, det räcker att det finns deklarerat i samma fil (eller i en inkluderad fil). Dock är det givetvis bättre att parameterisera sådana "objektöverlämningar" eftersom det drastiskt förbättrar läsbarheten.

paraxe skrev:

Ja du, vad är frågan nu när jag ser svaret. Jag trodde ett tag att jag fick lov att deklarera att det är ett objekt jag skulle ta emot i funktionen. Och sen visste jag inte om funktionen kunde ta emot ett Recordset.

Nu förstår jag vad du frågar efter. Ibland är saker lättare än man tror! :)

Mvh