/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Err.Number: 458
Fra : Terje


Dato : 10-10-02 20:51

Jeg har laget et program som virker fint på min maskin, men som henger på
en annen. Programmet genererer denne feilkoden:
Err.Number: 458
Err.Description: Variable uses an Automation type not supported in Visual
Basic

Her er koden som lager feilen, men jeg er ikke i stand til å se hva som er
galt. Kan noen hjelpe meg på vei?

Private Function MinFunksjon(ByVal sText As String) As String
On Error GoTo Err1

Dim oReg As RegExp
Set oReg = New RegExp
oReg.Global = True
oReg.IgnoreCase = True
oReg.Pattern = "<"

MinFunksjon= oReg.Replace(sText, ";<")

Call KillObject(oReg)
Exit Function

Err1:
Call LoggError("MinFunksjon", "", Err.Number, Err.Description)
MinFunksjon = "ERROR"
Call KillObject(oReg)
Exit Function

End Function

Begge maskiner er Windows 2000. VB6. Referanse er satt til Microsoft
VBScript
Regular Expressions 5.5.

terje





 
 
Peter Lykkegaard (10-10-2002)
Kommentar
Fra : Peter Lykkegaard


Dato : 10-10-02 20:55

Som svar på skriblerier forfattet af Terje

> Begge maskiner er Windows 2000. VB6. Referanse er satt til Microsoft
> VBScript Regular Expressions 5.5.
>
Og eksisterer dette komponent på begge maskiner - og samme versioner?

mvh/Peter Lykkegaard



Terje (10-10-2002)
Kommentar
Fra : Terje


Dato : 10-10-02 22:02

Komponenten heter vbscript.dll?
Versjon på min maskin: 5.6.0.6626
Versjon på problemmaskin (tilhører min eks-kjæreste, men DET er vel neppe
problemet : 5.5.0.6330
terje


"Peter Lykkegaard" <polonline@hotmail.com> wrote in message
news:ao4m34$d9t$1@sunsite.dk...
| Som svar på skriblerier forfattet af Terje
|
| > Begge maskiner er Windows 2000. VB6. Referanse er satt til Microsoft
| > VBScript Regular Expressions 5.5.
| >
| Og eksisterer dette komponent på begge maskiner - og samme versioner?
|
| mvh/Peter Lykkegaard
|
|



Terje (10-10-2002)
Kommentar
Fra : Terje


Dato : 10-10-02 23:20

Jeg prøver å bli litt klokere ved å bruke programmet Dependency Walker på
begge maskiner. Dette kan jeg pent lite om, men jeg finner følgende:
Selve lastingen av vbscript.dll ser ut til å gå fint:

LoadLibraryExW("C:\WINNT\System32\vbscript.dll", 0x00000000,
LOAD_WITH_ALTERED_SEARCH_PATH) called from "c:\winnt\system32\OLE32.DLL" at
address 0x77A6D5F4.
Loaded "c:\winnt\system32\VBSCRIPT.DLL" at address 0x6B600000. Successfully
hooked module.

Så umiddelbart før programmet henger så printer DW disse to siste linjene:

GetProcAddress(0x77E80000 [KERNEL32.DLL], "NlsGetCacheUpdateCount") called
from "OLEAUT32.DLL" at address 0x779C25C4 and returned 0x77E879C6.
GetProcAddress(0x77E80000 [KERNEL32.DLL], "GetCalendarInfoW") called from
"OLEAUT32.DLL" at address 0x779C38B3 and returned 0x77E9E2A4.

Her henger altså problemmaskinen. Når jeg kjøre DW på min egen maskin så ser
jeg at neste linje inneholder en referanse til nettopp vbscript.dll:

DllMain(0x6B600000, DLL_PROCESS_DETACH, 0x00000000) in
"c:\winnt\system32\VBSCRIPT.DLL" called.
DllMain(0x6B600000, DLL_PROCESS_DETACH, 0x00000000) in
"c:\winnt\system32\VBSCRIPT.DLL" returned 1 (0x1).
Unloaded "c:\winnt\system32\VBSCRIPT.DLL" at address 0x6B600000.

Og så er tydligvis mitt program ferdig med vbscript.dll.
Jeg forstår egentlig ikke en dritt av DW, som jeg tok i bruk for første gang
i går, men tyder ikke dette på at vbscript.dll enten har en versjonskonflikt
eller er korrupt?
terje



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408849
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste