Beste mensen,
Ik heb een PC geveegd met CCleaner en daarna weigert een, daarvoor goed werkende MS-access-applicatie, telefoonnummers uit de database uit te bellen via een ISDN-centrale.
Configuratie:
Operating system:Windows XP SP3
Programmaomgeving: MS-ACCESS 2003
Applicatie:
Een goeddraaiende applicatie, gerealiseerd met MS-access, bevat een knop waarmee telefoonnumers uit de database kunnen worden gebeld en informatie uit de database op basis van het nummer van inkomende gesprekken automatisch op het scherm wordt getoond.
Het apparaat waarmee gecommuniceerd wordt via de COM3-poort is een ISDN-centrale.
De VBA-coding onder de belknop ziet er als volgt uit:
De objectenbibliotheek die geladen is onder VBA in Access voor de communicatie met de ISDN-centrale is ARION Isdn controls V1.0
Probleem:
Na het draaien van CCleaner (V2.23.999) met maximale sweepinstellingen, dus ook op de tab applicaties alle vinkjes aangevinkt (ook regedit), geeft de opbelknop bij uitbellen van een nummer de foutmelding:
“Run-time error '8012'
The device is not open”
In de VBA-coding, noch in de Access-applicatie, noch in de configuratie is verder iets gewijzigd!
De VBA-code functioneert goed t/m de laatste regel,
, dus daar lijkt het niet in te zitten.
Als je het programma Dial.exe rechtstreeks aanspreekt, met de parameters uit de VBA-code, via de command line krijg je geen foutmelding. De zaak lijkt dan dus normaal te functioneren.
Vraag:
Zou iemand weten hoe ik dit probleem kan oplossen? Is er misschien een proces gestopt of in het register iets ten onrechte geveegd?
Ik heb een PC geveegd met CCleaner en daarna weigert een, daarvoor goed werkende MS-access-applicatie, telefoonnummers uit de database uit te bellen via een ISDN-centrale.
Configuratie:
Operating system:Windows XP SP3
Programmaomgeving: MS-ACCESS 2003
Applicatie:
Een goeddraaiende applicatie, gerealiseerd met MS-access, bevat een knop waarmee telefoonnumers uit de database kunnen worden gebeld en informatie uit de database op basis van het nummer van inkomende gesprekken automatisch op het scherm wordt getoond.
Het apparaat waarmee gecommuniceerd wordt via de COM3-poort is een ISDN-centrale.
De VBA-coding onder de belknop ziet er als volgt uit:
Code:
Sub DraaiNummer(Code As String, Naam As String, Nummer, ContPersID As Long)
If IsNull(Nummer) Then Exit Sub
If Len(Nummer) <= 0 Then Exit Sub
NewCall False, Code, Naam, Nummer, ContPersID
If (InStr(Nummer, ":")) Then Nummer = mId$(Nummer, InStr(Nummer, ":") + 1)
If (InStr(Nummer, "030")) Then Nummer = mId$(Nummer, InStr(Nummer, "030") + 3)
Nummer = Trim$(Nummer)
If Len(Nummer) < 10 Then Nummer = "030 " + Nummer
On Error Resume Next
Call Shell(DialDir & "Dial.exe 4 3 0" + Nummer)
End SubDe objectenbibliotheek die geladen is onder VBA in Access voor de communicatie met de ISDN-centrale is ARION Isdn controls V1.0
Probleem:
Na het draaien van CCleaner (V2.23.999) met maximale sweepinstellingen, dus ook op de tab applicaties alle vinkjes aangevinkt (ook regedit), geeft de opbelknop bij uitbellen van een nummer de foutmelding:
“Run-time error '8012'
The device is not open”
In de VBA-coding, noch in de Access-applicatie, noch in de configuratie is verder iets gewijzigd!
De VBA-code functioneert goed t/m de laatste regel,
Code:
Call Shell(DialDir & "Dial.exe 4 3 0" + Nummer)Als je het programma Dial.exe rechtstreeks aanspreekt, met de parameters uit de VBA-code, via de command line krijg je geen foutmelding. De zaak lijkt dan dus normaal te functioneren.
Vraag:
Zou iemand weten hoe ik dit probleem kan oplossen? Is er misschien een proces gestopt of in het register iets ten onrechte geveegd?
