DLL med "userdefined type" HASTER !!
Hjælp.....Jeg har lavet en DLL i VB 6.0 som følgende:
*******************************************
Private lokPriceInfo As typPriceInfo
Public Type typPriceInfo
CustomerName as string * 30
ProductName as string * 30
Price as Variant
end Type
Public Property Get PriceInfo() As typPriceInfo
PriceInfo = lokPriceInfo
End Property
Public Function GetPriceInfo(CustomerNo as integer, ProductNo as string) As String
........
........ DB opslag osv.
........
lokPriceInfo.CustomerName = "Kunde navn"
lokPriceInfo.ProductName = "Vare beskrivelse"
lokPriceInfo.Price = VarensPris
End Function
******************************************
Her kommer problemet:
Når jeg anvender DLLén fra en ASP side, kan jeg ikke "fange" indholdet af min type variabel (PriceInfo)
Jeg får fejlen:
Microsoft VBScript runtime (0x800A01A8)
Object required
Hvad gør jeg galt ??????????????????????????
Her er mit script:
set x = server.CreateObject("Price.PriceClass")
y = x.GetPriceInfo(123, "ABC")
Response.Write "Kundenavn: " & x.PriceInfo.CustomerName
Response.Write "Varenavn: " & x.PriceInfo.ProductName
Response.Write "Pris: " & x.PriceInfo.Price
set x = nothing
NB !!
Jeg kan fint anvende DLLén i en anden VB aplikation, og har ingen problemer med mine variabler.