Ejemplo:
lo = NEWOBJECT("_CommonFolder",HOME(1)+"FFC\_System") lcMD = lo.GetFolder(5) lcAP = lo.GetFolder(38) lo = .Null. MESSAGEBOX(lcMD,64,"Mis Documentos") MESSAGEBOX(lcAP,64,"Archivos de programa")Luis María Guayán
lo = NEWOBJECT("_CommonFolder",HOME(1)+"FFC\_System") lcMD = lo.GetFolder(5) lcAP = lo.GetFolder(38) lo = .Null. MESSAGEBOX(lcMD,64,"Mis Documentos") MESSAGEBOX(lcAP,64,"Archivos de programa")Luis María Guayán
No hay comentarios. :
Publicar un comentario
Los comentarios son moderados, por lo que pueden demorar varias horas para su publicación.