Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Problem with SQL pass-through
Message
De
06/03/2006 09:40:09
 
 
À
Tous
Information générale
Forum:
Visual FoxPro
Catégorie:
Base de données, Tables, Vues, Index et syntaxe SQL
Titre:
Problem with SQL pass-through
Versions des environnements
Visual FoxPro:
VFP 8
OS:
Windows XP
Network:
Windows XP
Database:
MySQL
Divers
Thread ID:
01101711
Message ID:
01101711
Vues:
53
HI ALL,

I use SQL pass-through , but when I use 'replace' nothing appened , here is a piece of my programm.
Help me please .
Best Regards
    Cver_code=thisform.service.configuration.text5.Value   
 
   SQLEXEC(gnConnHandle,'SELECT ser_code,ser_libelle,ser_nom,;
  ser_creation,ser_numero,ser_domino,;
  ser_etat,cli_code  ;
 FROM ;
     service service ;
       WHERE  service.ser_code=?Cver_code','cursservice')
  
CURSORSETPROP("Tables","service") 
CURSORSETPROP("KeyFieldList","ser_code")
CURSORSETPROP("UpdatableFieldList","ser_libelle,ser_nom,ser_creation,ser_numero,;ser_domino,ser_etat,cli_code","cursservice")
CURSORSETPROP("UpdateNameList","ser_libelle service.ser_libelle,"+;
							   "ser_nom service.ser_nom,"+;
							   "ser_creation service.ser_creation,"+;
							   "ser_numero service.ser_numero,"+;
							   "ser_domino service.ser_domino,"+;
							   "ser_etat service.ser_etat,"+;
							   "cli_code service.cli_code","cursservice")	   					   			                                   CURSORSETPROP("SendUpdates",.T.,"cursservice") 
CURSORSETPROP("WhereType",3,"cursservice") 
CURSORSETPROP("BatchUpdateCount",5,"cursservice") 
CURSORSETPROP("Buffering",5,"cursservice") 


 SELECT cursservice
  	REPLACE cursservice.ser_nom WITH  thisform.service.configuration.text2.Value
  	REPLACE cursservice.ser_numero WITH thisform.service.configuration.text3.Value
  	REPLACE cursservice.ser_domino WITH thisform.service.configuration.text4.Value
  	REPLACE cursservice.ser_etat WITH thisform.service.configuration.combo1.Value
     =TABLEUPDATE(.T.,.T.,"cursservice")  
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform