<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
<META content="MSHTML 6.00.6000.16544" name=GENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=#ffffff>
<DIV><FONT face=Arial size=2>I am (still) working with D6&nbsp;on a program that 
provides a COM/OLE services on windows clients, windows networks. The program 
allows VB code in MS Word and other programs to call these com services in my D6 
executable. Typically the services get data from a Firebird DB and pass it to 
the requestors.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>The program can register its COM interfaces when it 
first runs or by running it with the /regserver command line 
option.</FONT></DIV>
<DIV><FONT face=Arial size=2>It registers OK in all MS operating systems win9x, 
win2000, XP, win 2003, win 2003 SP1,&nbsp;(but not Win 2003 SP2) and Vista (once 
we use the "real admin" logon account). I have verified its registration works 
on each OS mentioned in actual sites and in my test setup. I have verified the 
registration is only partial in Win 2003 SP2. The com interfaces appear in the 
registry and they are removed when I run the program with command line 
/unregserver. Using TREGSRV does not help.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2>I repeat that Win 2003 SP1 and below is OK and Win 
2003 SP2 gives me this problem.</FONT></DIV>
<DIV><FONT face=Arial size=2></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial><FONT size=2>The dot (myfile.dot) file used when users are 
running MS Word as part of the application, when on Win 2003 SP2, is failing to 
compile.&nbsp;<SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA"><SPAN 
style="mso-spacerun: yes">&nbsp;T</SPAN>he VB Editor tissues the error "Compile 
error \n Error in Loading DLL" and points to an object referencing a servive 
provided by my program. When other programs ask for com services they are not 
provided. Yet when I edit this code in the VB Editor the code completion feature 
knows about my type library and presents options from my type library. So my 
type library seems to have been registered OK.</SPAN></SPAN></FONT></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA"></SPAN></SPAN></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2><SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA">This 
appears to be a Win 2003 SP2 bug. But, as&nbsp;the program is a&nbsp;Delphi 6 
product I am hoping someone here has some insights for me. We need the program 
running on Win 2003 where it is used as a terminal 
server.</SPAN></SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA"></SPAN></SPAN></FONT>&nbsp;</DIV>
<DIV><FONT face=Arial size=2><SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA">Insights 
will be welcome.</SPAN></SPAN></FONT></DIV>
<DIV><FONT face=Arial size=2><SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA">Thanks,</SPAN></SPAN></FONT></DIV>
<DIV><FONT><FONT face=Arial size=2><SPAN class=value><SPAN 
style="FONT-SIZE: 12pt; FONT-FAMILY: 'Times New Roman'; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: EN-AU; mso-fareast-language: EN-AU; mso-bidi-language: AR-SA">Russell 
Belding</SPAN></SPAN></FONT></FONT></DIV></BODY></HTML>