Como se puede trabajar ADO con MYSQL con wbrowse con tablas vacias
SAludos
FiveTech Software tech support forums
www.FiveTechSoft.com
ADO /MYSQL con WBROWSE
3 posts • Page 1 of 1
ADO /MYSQL con WBROWSE
by jbrita » Wed Jun 25, 2008 7:23 pm
- jbrita
- Posts: 503
- Joined: Mon Jan 16, 2006 3:42 pm
by Vladimir Zorrilla » Thu Jun 26, 2008 2:08 am
Pues consistemciandolo
::oDatos:=CreateObject("adodb.Recordset")
::oDatos:CursorLocation := 2 //3 //adUseServer //adUseClient
::oDatos:LockType := 3 // adLockOptimistic
::oDatos:CursorType := 1 // adOpenKeyset
::oDatos:Source:=cStatement
::oDatos:ActiveConnection:=::oConnect
::oDatos:Open()
::cSelect := cStatement
Este dato ponlo como if dentro del bline
::oDatos:Fields:Count()
::oDatos:=CreateObject("adodb.Recordset")
::oDatos:CursorLocation := 2 //3 //adUseServer //adUseClient
::oDatos:LockType := 3 // adLockOptimistic
::oDatos:CursorType := 1 // adOpenKeyset
::oDatos:Source:=cStatement
::oDatos:ActiveConnection:=::oConnect
::oDatos:Open()
::cSelect := cStatement
Este dato ponlo como if dentro del bline
::oDatos:Fields:Count()
ME INTERESA FW Y XHB POR SER OPEN SOURCE
- Vladimir Zorrilla
- Posts: 225
- Joined: Tue Feb 28, 2006 4:25 pm
- Location: PERU
by Vladimir Zorrilla » Thu Jun 26, 2008 2:11 am
perdon es este metodo
olbx:bLine:={ || if(::oDatos:RecordCount()=0,array( elem),
olbx:bLine:={ || if(::oDatos:RecordCount()=0,array( elem),
ME INTERESA FW Y XHB POR SER OPEN SOURCE
- Vladimir Zorrilla
- Posts: 225
- Joined: Tue Feb 28, 2006 4:25 pm
- Location: PERU
3 posts • Page 1 of 1
Return to FiveWin para Harbour/xHarbour
Who is online
Users browsing this forum: No registered users and 42 guests