webForumDet fria alternativet

Problem med activex dll

1 svar · 196 visningar · startad av Gein

GeinMedlem sedan sep. 20005 700 inlägg
#1

Jag har gjort en activeX dll, för att hämta viss information ur winamp. Funktionerna funkar klockrent om jag kallar dom i ett vbskript. t.ex:

dim obj
dim c

set obj = CreateObject("WaC.WinAmp")

c = obj.PlayListCount()
msgbox c
msgbox obj.showcurrent(1)

Men om jag kör samma fast i asp, så funkar det inte. Jag får inget felmeddelande, men värdena som funktionerna ger är bara 0 eller null beroende på om funktionen ger ett returvärde i long eller string.

<%
dim obj
dim c
Set obj = Server.Createobject("WaC.WinAmp")

c = obj.PlayListCount()

Response.Write obj.Showcurrent(1)

response.write obj.playlistcount()

%>

Hur kommer det sej att asp-sidan inte visar något svar, men vbskriptet gör det?

GeinMedlem sedan sep. 20005 700 inlägg
#2

Det blir fel på första raden i funktionerna som ser ut såhär:
hwndWinamp = FindWindow("Winamp v1.x", vbNullString) '"Winamp v1.x"
Den som tar reda på vilket handle winamp har. Det blir iofs inte fel, men värdet blir 0, vilket resulterar i att hela funktionen blir 0. Det märkliga är att denna rad blir bara noll när jag kör den i ASP. med ett vbskript funkar det.

135 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)