FiveTech Software tech support forums

if I used function
oCon := FW_OpenAdoConnection( xSOURCE + "," + xPASSWORD)

the database opened good, but the function FW_OpenRecordSet can't open the table

cSQL:="select idklienta, nazwa, adres, nip from Klienci"
oRes := FW_OpenRecordSet( oCon, cSQL )

best regards
kajot

... := cPATH+"waga.mdb" xPASSWORD := "123456" oCon := FW_OpenAdoConnection( xSOURCE,xPASSWORD) cSQL:="select idklienta, nazwa, adres, nip from Klienci" oRes := FW_OpenRecordSet( oCon, cSQL ) the function FW_OpenRecordSet( oCon, cSQL ) retrun error openning table ...

... // naglowki oPRN:CmSay(6.0+(nLP)*nINT,aKOLUMNY[1],"L.p." ,oFARIAL6N,,,,1) oPRN:CmSay(6.0+(nLP)*nINT,aKOLUMNY[2],"Nazwa" ,oFARIAL6N) oPRN:CmSay(6.0+(nLP)*nINT,aKOLUMNY[3],"j.m." ,oFARIAL6N,,,,1) oPRN:CmSay(6.0+(nLP)*nINT,aKOLUMNY[4],Ptxt("ilo~s~c") ...

... OF oDlg SIZE 10,12 PIXEL @ 25, k1 SAY "&Nr:" OF oDlg PIXEL @ 25, k2 GET cNr picture '99999' when lAppend OF oDlg PIXEL @ 40, k1 SAY "&Nazwa:" OF oDlg PIXEL @ 40, k2 GET cNazwa picture replicate('!',40) OF oDlg PIXEL @ 55, k1 SAY "&Opis:" OF oDlg PIXEL @ 55, k2 GET cOpis picture ...

James You can also use xBrowse to show multiple lines without using CR+LF in each line. xBrowse will do it automaticaly. ... oBRWR:nRowHeight :=50 ... oCol:= oBRWR:AddCol() oCol:bStrData := {|| BRWR_SPIS_BADAN() } oCol:cHeader := "Zlecone badania" oCol:nWidth:=200 ... Function BRWR_SPIS_BADAN() Loca...

... xTABBAD:={} Do While FF->RECNO=xRECNO .AND. .NOT. FF->(Eof()) AADD(xTABBAD,{; FF->NR_G,; FF->NR_T,; OemToAnsi(FF->NAZWA),; Str(FF->ILOSC*FF->CENA_S,8,2),; Get_Naz_Pra(FF->NR_S),; Str(FF->ILOSC*GET_xTABCENN(FF->NR_T,4),8,2),; DToC(FF->A_DATA)+FF->A_TIME,; ...

... xTABBAD,.F.) // nie szukaj po badaniach oBRWF :nHeaderLines := 2 oBRWF :nDataLines := 1 oBRWF :lFooter :=.t. oBRWF :aCols[3]:cHeader := "Nazwa"+sCRLF+"badania" oBRWF :aCols[3]:cFooter := "RAZEM : " oBRWF :aCols[4]:cHeader := "Cena"+sCRLF+"badania" oBRWF :aCols[4]:cFooter := Transform(nRABAT,"#####.##") ...

... OF oDlg @ 7, 6 GET cSYN OF oDlg @ 8, 1 SAY "Sub:" OF oDlg @ 8, 6 GET cSUB OF oDlg @ 9, 1 SAY "Nr:" OF oDlg @ 9, 6 GET cNR OF oDlg @10, 1 SAY "Nazwa:" OF oDlg @10, 6 GET cNazwa OF oDlg @11, 1 SAY "Przychód:" OF oDlg @11, 6 GET cPrzychod OF oDlg @12, 1 SAY "Rozchód:" OF oDlg @12, 6 GET cRozchod ...