| | « //Variables NomFichierSel est une chaîne nIdFic est un entier //Séléction du fichier ZIP de reproduction NomFichierSel=fSélecteur("", "", "Sélectionnez un fichier...", "Tous fichi… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « // Conexão HFSQL sNomConnexion est une chaîne = "Manta_pcs_serveurpcsoft" sLibelléConnexion est une chaîne = "Connexion au serveur manta.pcs" sTypeConnexion est une chaîne = "WinDe… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « Voici le type de code que j`ai l`habitude d`utiliser pour réaliser ce traitement : //INIT DE PROJET //On vérifie dans le fichier INI si l`entrée RepCopieImage existe, sinon on l`af… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « Tabela = NumLigne ReturnToCapture ( Tabela . Column2 ) -- Adriano José Boller ______________________________________________ Consultor e Representante Oficial da PcSoft no Brasil … » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « //Variables i, j sont des entiers //Parcours de chaque volet POUR i = 1 A Onglet1..Occurrence j = 1 //On visite chaque volet dans l`ordre logique TANTQUE EnumèreChamp(Onglet1[i],j… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « //Exemplo TableSelectPlus(Nom_De_Table, Indice_de_ligne) RepriseSaisie(Nom_de_colonne) -- Adriano José Boller ______________________________________________ Consultor e Representa… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « //Exemplo SI EmailOuvreSessionSMTP ( "toto", "smtp.wanadoo.fr") = Vrai ALORS // Procédure permettant d`initialiser la structure e-mail Email.Destinataire[1] = "toto@free.fr" Email.… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « // Apagar o cursor após 3 segundos Timer("pEffaceCurseur",300,1) //Code de la procédure pEffaceCurseur() Procedure pEffaceCurseur() EXTERNE NomChampImageOuNomFenetre NomChampI… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « //Variable sRepertoire est une chaîne = ComplèteRep(fRepExe()) Message(Case1, "Copie des fichiers FIC sur le POCKET") fListeFichier(sRepertoire + "*.fic",pCopieFichiersSurPPC) Me… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |
| | « SI PAS USBDétecteStockageAmovible("ProcédureUSB") ALORS Erreur(ErreurInfo()) FIN //---------------------------------------- Procedure ProcédureUSB(Lettre, Action) SI Action = Sto… » |
Iniciado en 02 jul. 2016 por |
| |
| |
| | |