FiveTech Software tech support forums

... "No se puede conectar a la BD: " + cDbName, "Operacin Cancelada" ) oCon:Free() return endif // Creamos un objeto Table con DataFields oTb := TMsTable( cTabla ):New( oDataBase, cTabla ) // Abrimos la tabla, traemos el resultado a nuestro cliente if !oTb:Open() MsgInfo( "No ...

... and xHarbour. Its a basic CRM and quoting system. I need to add the functionaliy to be able to send bulk emails to the database by merging certain datafields. i.e. Dear <<title>> <<surname>> etc. Where I need the help is the editor - I would like the user to be able to create ...

Y como se manejan en esta clase los datafields


Es decir

obj:Nombre de campo


Saludos Cordiales

Friends Have function for create DATAfields function TMyMSQuery( cCls ) ; return( MyGenClass( cCls, TMSQuery() ) ) The variable __aHCls AAdd( __aHCls, { cClsName, __nClassH } ) the class and handle How free static __aHCls := {} #include "HbClass.ch" ...

Estimados Amigos Usa una funcion para crear DATAfields function TMyMSQuery( cCls ) ; return( MyGenClass( cCls, TMSQuery() ) ) Uso una variable __aHCls a la que le agrego AAdd( __aHCls, { cClsName, __nClassH } ) la clase y su manejador pero no se ...

... ; ORDER BY 1 ; OF oDtBase // Traemos el resultado a nuestro cliente OPEN TABLE oTabla *oTabla := TMsTable( cTabla ):New( oDtBase, cTabla ) // Con DataFields: // oTabla := TMyTable( cTabla ):New( oDtBase, cTabla ) // Traemos el resultado a nuestro cliente IF oTabla:lOpened DEFINE DIALOG oDlg RESOURCE ...

... ; ORDER BY 1 ; OF oDtBase // Traemos el resultado a nuestro cliente OPEN TABLE oTabla *oTabla := TMsTable( cTabla ):New( oDtBase, cTabla ) // Con DataFields: // oTabla := TMyTable( cTabla ):New( oDtBase, cTabla ) // Traemos el resultado a nuestro cliente IF oTabla:lOpened DEFINE DIALOG oDlg RESOURCE ...