Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
WestWind/database filter help
Message
De
29/06/2011 16:12:57
 
 
À
28/06/2011 04:28:16
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01516279
Message ID:
01516752
Vues:
61
Noted about the parameters, but that's the way everything is set up from before so I'd rather at least get it working that way so I can have something going for me rather than have nothing working and learning a different way to do it.

I tried this:
THESQLDB = "TBL_BL"
THESQLTABLE = "TBL_BOL"
THESERVER = goWCServer.oConfig.oTask.cSQLServer
usr = ""
pas = ""
ConnStr = [driver=SQL Server; server=]+THESERVER+[; database=]+THESQLDB+[; uid=]+usr+[;pwd=]+pas+[; Trusted_Connection=No;]
curHandle = SQLstringCONNECT( connStr )
cmd = ['SELECT * FROM THESQLTABLE']+ALLTRIM(user.cclientcd)+[']
lr = SQLEXEC( curHandle, cmd, "sq") && sq is the cursor the data is loaded into

loSC = CREATEOBJECT("wwShowCursor")
loSC.lCenterTable = .f.
loSC.cHeaderBGColor = "black" &&"#336633"
loSC.lAlternateRows = .T.
loSC.cAlternatingBGColor = "white" &&"#EFEFEF"
loSC.cTableBorder ="3"
loSC.cTableWidth="750"
DIMENSION laHeaders[10]
laHeaders[1] = "BOL"
laHeaders[2] = "PRO"
laHeaders[3] = "Ref#"
laHeaders[4] = "oci"
laHeaders[5] = "ost"
laHeaders[6] = "ozp"
laHeaders[7] = "dci"
laHeaders[8] = "dst"
laHeaders[9] = "dzp"
laHeaders[10] = "Ship Date"
loSC.BuildFieldListHeader(@laHeaders)
loSC.lSumNumerics = .t.
loSC.ShowCursor()
lctable=loSC.GetOutput()
It stopped asking me which database to use and displays the headers, but it's pulling data from some completely different table than the one I'm trying in my query. I taking out the * and putting in a column name and it did nothing, so apparently I'm still overlooking something big. I have no idea where it's getting the data from.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform