---

Hej NG.

Jeg skal bruge en lidt speciel login side:
Brugeren indtaster sit userid og password og verificeres mod et givent
system. Indtastes korrekt userid og password, skal brugeren logges på
systemet med et mappet userid, der kan være forskelligt fra det der blev
brugt til verificering.

Det har jeg lavet en VB6 dll, der klarer fint:
Public Function Verify(PlatformID as String, ByVal Password as String) As
Boolean
If OkPass(PlatformID, Password) Then
PlatformID = GetMappedID(PlatformID)
End If
End Function

Det virker fint når jeg tester i en VB exe fil, men i ASP bliver værdien af
PlatformID ikke ændret.
Hvorfor ikke?

mvh
Stefan

---

> Public Function Verify(PlatformID as String, ByVal Password as String) As
> Boolean
> If OkPass(PlatformID, Password) Then
> PlatformID = GetMappedID(PlatformID)
> End If
> End Function
Jeg har lavet PlatformID om til en Variant, og så virker det.
Men hvorfor virke det ikke med en String? Er der forskel på String i VB og
String i ASP?
Min ASP test kode er som følger:
Dim UserID
UserID = CStr(Request("UserID"))
If obj.Verify(UserID, Password) Then
Response.Write UserID
End If
Hvliket foriøvrigt giver 'Type mismatch' på UserID hvis det er en string i
VB, selvom typename="String" i ASP.

c",)
Stefan

---

"Stefan Kristensen" <stefank@asg.com> wrote

> Er der forskel på String i VB og
> String i ASP?

ALLE variabler i ASP.old (vbscript) er VARIANT, nothing more.
I ASP.net er det ren VB.

---

Stefan Kristensen wrote:
> Det har jeg lavet en VB6 dll, der klarer fint:
> Public Function Verify(PlatformID as String, ByVal Password as
> String) As Boolean
> If OkPass(PlatformID, Password) Then
> PlatformID = GetMappedID(PlatformID)
> End If
> End Function
>
> Det virker fint når jeg tester i en VB exe fil, men i ASP bliver
> værdien af PlatformID ikke ændret.
> Hvorfor ikke?

Gad vide om det ville hjælpe hvis du i din funktion angav ByRef på din
variabel:

Public Function Verify( ByRef PlatformID osv.

Ellers ville jeg jo sige at din returværdi skal indlæses i en variabel der
hedder det samme som din funktion og når du så kalder fra asp siger du:

strNyPlatformID = Verify(PlatformID osv.

Mvh
Chrisser

---

> Gad vide om det ville hjælpe hvis du i din funktion angav ByRef på din
> variabel:
>
> Public Function Verify( ByRef PlatformID osv.
ByRef er default hvis man ikke angiver noget.

> Ellers ville jeg jo sige at din returværdi skal indlæses i en variabel der
> hedder det samme som din funktion og når du så kalder fra asp siger du:
>
> strNyPlatformID = Verify(PlatformID osv.
Ja, men den returnerer jo en Boolean. Jeg bruger ByRef for at kunne nøjes
med en enkelt funktion.

Stefan

---

Stefan Kristensen wrote:
>> Gad vide om det ville hjælpe hvis du i din funktion angav ByRef på
>> din variabel:
>>
>> Public Function Verify( ByRef PlatformID osv.
> ByRef er default hvis man ikke angiver noget.

Ja, det er bare som om at nogle ting skal pointeres hvis man arbejder med en
dll der kaldes fra asp
- det er i hvert fald min erfaring...

>> Ellers ville jeg jo sige at din returværdi skal indlæses i en
>> variabel der hedder det samme som din funktion og når du så kalder
>> fra asp siger du:
>>
>> strNyPlatformID = Verify(PlatformID osv.
> Ja, men den returnerer jo en Boolean. Jeg bruger ByRef for at kunne
> nøjes med en enkelt funktion.

Den havde jeg overset

- men jeg kan se du fandt løsningen og så er det jo godt

Chrisser

---

> Ja, det er bare som om at nogle ting skal pointeres hvis man arbejder med
en
> dll der kaldes fra asp
Det kan du have ret i. Jeg prøvede med ByRef men med samme fejl.

> - men jeg kan se du fandt løsningen og så er det jo godt
Snare en work around. Jeg er stadig interesseret i at vide om der bare er
forskel på String i ASP og VB, eller om det er noget andet der gør sig
gældende.

Stefan.

---

Stefan Kristensen wrote:
>> Ja, det er bare som om at nogle ting skal pointeres hvis man
>> arbejder med en dll der kaldes fra asp
> Det kan du have ret i. Jeg prøvede med ByRef men med samme fejl.
>
>> - men jeg kan se du fandt løsningen og så er det jo godt
> Snare en work around. Jeg er stadig interesseret i at vide om der
> bare er forskel på String i ASP og VB, eller om det er noget andet
> der gør sig gældende.

Det er et godt spørgsmål - jeg har en dll lavet i VB. I den kalder jeg
funktioner fra asp med en hel masse argumenter - Jeg havde også problemer
med kaldet og endte med at caste dem idet jeg kalder funktionen:

Flet.UdskrivBrev Response, cstr(dok), cstr(cri), cstr(DSN) osv

Sådan at jeg caster til den type funktionen forventer - det virker for mig,
men jeg kører heller ikke med returværdier jeg skal blot fortælle hvordan
der gik og udskrive et link.
Dette gør jeg så fra dll'en via response ( som i øvrigt er rigtig god at
sende med ind især under udvikling fordi den letter debugging )

Chrisser

---

> >> - men jeg kan se du fandt løsningen og så er det jo godt
> > Snare en work around. Jeg er stadig interesseret i at vide om der
> > bare er forskel på String i ASP og VB, eller om det er noget andet
> > der gør sig gældende.
>
> Det er et godt spørgsmål - jeg har en dll lavet i VB. I den kalder jeg
> funktioner fra asp med en hel masse argumenter - Jeg havde også problemer
> med kaldet og endte med at caste dem idet jeg kalder funktionen:
>
> Flet.UdskrivBrev Response, cstr(dok), cstr(cri), cstr(DSN) osv
>
> Sådan at jeg caster til den type funktionen forventer - det virker for
mig,
> men jeg kører heller ikke med returværdier jeg skal blot fortælle hvordan
> der gik og udskrive et link.
> Dette gør jeg så fra dll'en via response ( som i øvrigt er rigtig god at
> sende med ind især under udvikling fordi den letter debugging )
Yup. Jeg startede også med at caste alle mine kald til dll'erne. Men ved at
benytte ByVal i dll'erne behøver man ikke at caste i ASP

mvh
Stefan

---

Stefan Kristensen wrote:
>> Sådan at jeg caster til den type funktionen forventer - det virker
>> for mig, men jeg kører heller ikke med returværdier jeg skal blot
>> fortælle hvordan der gik og udskrive et link.
>> Dette gør jeg så fra dll'en via response ( som i øvrigt er rigtig
>> god at sende med ind især under udvikling fordi den letter
>> debugging )
> Yup. Jeg startede også med at caste alle mine kald til dll'erne.
> Men ved at benytte ByVal i dll'erne behøver man ikke at caste i ASP

Det virker jo meget logisk

Chrisser