Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
SQLexec calls not working on all SQLservers
Message
 
À
02/08/2002 10:43:35
Information générale
Forum:
Visual FoxPro
Catégorie:
Applications Internet
Divers
Thread ID:
00685438
Message ID:
00685557
Vues:
11
In a program I have written I am using SQLEXEC to query two SQLservers. One is local to me, one is at another facility. Both SQLservers are in the same domain. When the exe queries my local server I get data. When the exe queries the remote server no data is received. If I run this exe as a foxpro exe sitting on a Novell server it works fine and data comes from both sqlservers, it is when the program is run as a .dll or an out-of-process exe from an IIS server that we loose the data. The IIS server is not in the domain with the SQLservers. It would make sense to me if the IIS server lost data from both SQLservers, but not losing it from one.

The only complicating factor may be that the remote SQLserver is on a VPN which is established through a PIX firewall. However to test the VPN we have created a data connection in Interdev and we have no problems seeing the remote SQLserver and browsing it's tables.

The IIS server does have an ODBC connection to each sqlserver. We are using logon and password authentication to the SQLservers, not trusted connections.


Hi Margaret!!!

How you been? Hope everything is going well. Say hi to Tim for me.

When you compile the DLL are you using for COM+ or COM? If you're using it in COM+ give the DLL's admin rights to the domain. It sounds like it's a security issue you facing.

However, if you've ruled out security the next piece of advise I can give you is to add some code to you program immediately after the SQLEXEC() that checks for errors. Something like so...

lnSuccess = SQLEXEC(lnConnection, lcSQLString, lcCursorName)

IF lnSuccess < 1
lnErrors = AERROR(laErr)
FOR lnI = 1 to lnErrors
STRTOFILE(TRANSFORM(laErr(lnI,1),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
STRTOFILE(TRANSFORM(laErr(lnI,2),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
STRTOFILE(TRANSFORM(laErr(lnI,3),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
STRTOFILE(TRANSFORM(laErr(lnI,4),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
STRTOFILE(TRANSFORM(laErr(lnI,5),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
STRTOFILE(TRANSFORM(laErr(lnI,6),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
STRTOFILE(TRANSFORM(laErr(lnI,7),'c:\temp\err.txt',1) + CHR(13) + CHR(10)
NEXT lnI
ENDIF
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform