Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Problem with SQL pass-through
Message
From
06/03/2006 09:40:09
 
 
To
All
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Title:
Problem with SQL pass-through
Environment versions
Visual FoxPro:
VFP 8
OS:
Windows XP
Network:
Windows XP
Database:
MySQL
Miscellaneous
Thread ID:
01101711
Message ID:
01101711
Views:
55
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")  
Next
Reply
Map
View

Click here to load this message in the networking platform