Search  
Friday, May 25, 2012 ..:: Forum ::.. Register  Login
 Forum Minimize
Pentru a putea posta mesaje trebuie să vă înregistraţi.
Notă: Mesajele cu conţinut jignitor sau ilegal (inclusiv cereri de soft piratat) nu sunt acceptate şi vor fi şterse imediat .

Pentru a primi raspunsuri rapide si corecte, scrieti in mesaj ce intentionati sa faceti, ce mesaj de eroare primiti, in ce context si in urma caror actiuni. De asemenea, mentionati versiunea de FoxPro in care lucrati!
Dacă nu specificați versiunea, se consideră VFP 9.0 SP2.

SearchForum Home
  Visual FoxPro  Baze de date, tabele, view-uri si indecsi  Import din Exce...
 Import din Excel in tabela
 
 10/26/2010 5:12:12 PM
User is offlineji_ci
191 posts
5th


Import din Excel in tabela
 (N/A)
Vreau sa aduc cu "replace" niste valori dintr-un fisier Excel intr-o tabela si nu-mi merge. Din cate am observat problema apare cand deschid fisierul .xls ... atunci nu-mi mai recunoaste variabilele din programul meu. Exista o alta varianta de a importa datele din fisierul .xls? Specific ca trebuie sa fac asta prin comanda unui buton din program!
 10/28/2010 1:58:07 PM
User is offlineji_ci
191 posts
5th


Re: Import din Excel in tabela
 (N/A)
public nrr

select 1
use date_orare again


fisier="C:\FISA"
fisa=createobject("excel.application")
fisa.workbooks.open(""+''+fisier+''+".xls")
fisa_220 = fisa.activeworkbook.sheets(1)
fisa_110 = fisa.activeworkbook.sheets(2)
nrr = fisa_220.Cells(19,2).value

 select 1
messagebox(' '+str(nrr)+' ')       
replace val_1 with str(nrr) for data = data_curenta and cod_echip = 100

Acesta este codul din programul cu care incerc sa aduc date din fiserul Excel. In messagebox imi afiseaza variabila nrr, dar in tabela imi apare " " (adica gol). Daca la linia cu replace in loc de str(nrr) pun o un sir de caractere (de ex "126") oarecare atunci imi apare in tabela. Folosesc VFP 6 daca are vreo importanta! Spuneti-mi va rog unde gresesc!




 10/28/2010 2:42:29 PM
User is offlineDaniel Buduru
2335 posts
1st




Re: Import din Excel in tabela
 (N/A)
Campul val_1 este mai scurt decat lungimea stringului nrr iar valoarea este truncheata la lungimea campului.

Pune fie
Replace val_1 with allt(str(nrr))
Fie (preferabil)
Replace val_1 with tran(nrr)


Daniel Buduru
 10/28/2010 8:17:26 PM
User is offlineji_ci
191 posts
5th


Re: Import din Excel in tabela
 (Romania)
Bineinteles ca functioneaza! Numai la asta nu m-am gandit! Multam' mult!
  Visual FoxPro  Baze de date, tabele, view-uri si indecsi  Import din Exce...

Search  Forum Home         

 Google Ads Minimize

    

Copyright 2002-2010 Profox   Terms Of Use  Privacy Statement