Pomoč pri Basicu

Naredu sem neki DLL (VajaDLL.dll) z Visual Basicom in v njem se nahajata Class Module Vaja ter VajaDB (med drugimi) v katerem se spet nahaja funkcija Izpisi, ki je definirana tko: Public Function Izpisi(ByRef aVaja As VajeDLL.Vaja) As Boolean, funkcija ki torej sprejema en argument po referenci in vrača vrednost tipa boolean. Potem pa v ASP datoteki kličem (uporabljam VBScript jezik) to funkcijo (predhodno sem seveda inicializiral potrebne spremenljivke) tko: najdeno = objVajaDB.Izpisi(objVaja), torej želim da mi tisti boolean kar funkcija vrača prepiše v ono spremenljivko "najdeno" , vendar mi IE potem ko naložim to ASP datoteko javi napako type missmatch pa ne vem zakaj!!! Sem že vse sprobal pa brez uspeha, še znorel bom. PROSIM ČIMPREJ POMAGAJTE.

Čudno je tud da pri uporabi VB skriptnega jezika ne morem napisati stavka kot je Dim nekaSpremenljivka As Boolean in mi javi napako češ da je pričakoval konec stavka še pred besedico "As", čeprav je to čisto lep in veljaven stavek v Basicu. Kako torej pri definicji spremenljivke določit še tip spremenljivke?

Hvala za poiskus, vendar ni pomagalo, še kr dobivam type mismatch.

Itak mi je blo čudno da Basic (VB) naj ne bi podpiral Boolean če pa v helpu piše da podpira, poleg tega pa ga celo uporabljam, tko da sigurn dela. To seveda govorim samo za VB, ne za VB skriptni jezik (mora bit neka razlika saj kot zgoraj omenjeno, v skripti ne dela izraz "Dim xxx As Nekaj" medtem ko v VB dela).

Dajte no tisti ki veste, POMAGAJTE PROSIM. NUJNO.

Tole:

 Public Function lala() As Boolean
 lala = False
 End Function
 
 Private Sub Command1_Click()
 Dim qwe As Boolean
 qwe = True
 qwe = lala
 MsgBox (qwe) ' Tukaj zadeva vrne ven false, torej se funkcija izvede
 End Sub
 

V VB6.0SP5 Dela brez problemov. Ce bi bil tisti public definiran v nekem razredu spet ne bi smelo biti tezav.

Da ni problem pri definiciji objVajaDB?

A mogoče takole:

local lala() As Integer

ali pa

global lala() As Integer

ali pa

global lala%()

in potem

Dim lala(100)

o+ nevone

% = as integer

o+ nevone

Ok ampak jest nočem da funkcija obravnava neko spremenljivko kot nekaj ampak da se tisto kar funkcija vrača obravnava kot nekaj. Sem tudi že poskusil tako: Cint(funkcija(lala)) pa tud ni pomagal, prav tako je bila neuspešna definicija da funkcija vrača tip variant (baje so vse spremenljivke v VBScript, vsaj na začetku, default tipa variant). TOREJ: kako v VBSript jeziku shranit neko vrednost (npr. tipa integer ali boolean) ki jo neka funkcija vrača v neko spremenljivko, tako: "spremenljivka = funkcija()"? Pa to sem mislil da je banalna zadeva pa zgleda da ni!

Se zahvaljujem za poslane predloge (zadnjega še nisem sprobal, ga bom morda ob priliki), vendar po vseh teh mukah sem se odločil spremeniti cel algoritem (sej ni blo tolko) tako da sploh ne pride več do te situacije in zdaj dela.