Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Error Trying to put a COM item on a W2000 Server
Message
De
18/11/2000 02:25:38
Michael Vaccarello
Insurance Data Processing, Inc.
Wyncote, Pennsylvanie, États-Unis
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
COM/DCOM et OLE Automation
Titre:
Error Trying to put a COM item on a W2000 Server
Divers
Thread ID:
00443347
Message ID:
00443347
Vues:
30
You'll forgive me, but I am new at this COM stuff. Ok. I compiled my program as a Single Threaded COM component. I put it on the MTS server (Windows 2000 Internet Server) and tried to add the package. Everything is good until I hit Finish. Then it says:
"The Component DLL's self-registering routine failed. the DLLRegisterServer function failed or did not register the component."

I had copied over the TBL and DLL to the server. Any ideas??? Below is the code that I am using in a project entitled: "NAMECOM":

Define class MVVClass as session olepublic

Procedure GetSoundex
Parameters m.NameIn, m.xType , m.Key2Return

* In WEB PAGE you would call it like this:
* oVFPServer = createobject('servername.MVVClass')
* cPhoneticStr = oVFPServer.GetSoundex(Name, Type, Key2Return)

Declare INTEGER matcher IN ISTDLL32 ;
STRING,STRING,STRING,STRING,;
STRING,STRING,STRING,STRING

m.NameIn = m.NameIn+space(256-len(m.NameIn))
m.nameout =space(256)
m.rulebase =space(250)
m.pheonetic=space(250)
m.keycount =space(2)
m.keystack =space(300)
m.rangetable=space(750)

m.xi = matcher( @Service , @NameIn , @nameout , @rulebase , ;
@pheonetic, @keycount , @keystack , @rangetable )

Return substr(keystack, 10*Key2Return-9 ,10)
Endproc

Enddefine
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform