Creation EXE

BUZZ2K Messages postés 64 Date d'inscription lundi 4 octobre 2004 Statut Membre Dernière intervention 14 septembre 2008 - 24 mai 2005 à 14:49
BUZZ2K Messages postés 64 Date d'inscription lundi 4 octobre 2004 Statut Membre Dernière intervention 14 septembre 2008 - 24 mai 2005 à 22:44
Bonjour, je doit programmer un petit truc en vb capable, de generer un .exe, qui cervira a faire du transfert automatique d efichier entre 2 pc grace a PcAnywhere...
Je m'explique:
L'utilisateur (experimenté) disposera d'une ou plusieures cellules dans lesquelles il pourra tapper 2/3 commandes, ensuite, il aura moyen de choisir, les fichiers a transferer et dans quel sens, (pour cela il indiquera les chemins du fichier source et du fichier but), Pc Anywhere utilise les Commandes FileXferFromHost(FichierEleve, FichierMaitre) et FileXferToHost(FichierEleve, FichierMaitre).
Bref mon programme va generer en faite tout le cod enécéssaire pour effectuer les operations souhaitées, ET doit l'exporter en .exe pour que l'utilisateur Novice n'ait qu'a dbl cliquer sur l'exe...
Pour creer un .exe a partir d'un .vb, j'ai trouver /target:exe dans Msdn visible a cette adresse:http://msdn.microsoft.com/library/default.asp?url=/library/en-us/vblr7/html/valrftargetexecreateconsoleapplication.asp?frame=true

(dailleur si quelqun sait comment acceder en ligne a MSDN en Fr, je suis preneur car actuellement je n'ai pa le cd MSDN pour le consulter sur le pc, et je la consulte dc en ligne... en En-Us (Cf Lien...)

Voila si quelqu'un parmis vous sait se servir de cette commande, j'aimerai bien si possible qu'il m'explique un peu mieu le fonctionnement de cette derniere.

Merci ++ -BUZZ-

4 réponses

cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 21
24 mai 2005 à 19:20
Salut,

Tes derniers posts étaient sur le Mass Mailing. Maintenant, tu parles de PcAnyWhere qui est un logiciel de prise de contrôle à distance (parmi d'autres).
Si tu exposais clairement ton but ?

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
0
BUZZ2K Messages postés 64 Date d'inscription lundi 4 octobre 2004 Statut Membre Dernière intervention 14 septembre 2008
24 mai 2005 à 21:24
Mdr !
Salut CaniLupus !
Merci de repondre à mon post bien que tu ne te soit clairement egaré, mon post ou je parle de MassMailing c'est un vieu post ke j'ai ressortie des flots, que j'avai poster en decembre (non personne n'as trouvé la solution depuis), et non désolé de te l'apprendre, ce n'est pas dans un but mal intentionné.
Je m'explique, dans le cadre de mon BTS Info Gestion, je doit effectuer plusieurs Action Pro, la premiere etant pour la societe d'un amis qu'il vient de lancer, au statut de microsociété, il m'as demander de lui creer une Base De donner afin de gerer ses stock, commande Frs et Commandes Client, Journal des Vente, Journal des achats, statistique par client, Catalogue des produits Etc, ET et oui et c la qu'intervient le mass mailing, car il souhaitait envoyer son catalogue par mail a ses clients. L'emploi de MassMailing n'est qu'une invention de ma part en faite, je l'ai nommer ainsi car il touche bocou d epersonne dans sa base de données. Ici dans le probleme que j'expose, ma Fonction s'appelle, regarde bien, MailTracking, car il souhaite envoyer un mail automatique au client des qu'il aura rentré le numero de tracking du colis dans la Bdd...
Lors du mass mailing, je n'avait pas rencontré de Pb car ma requette c'effectuait sur une Table.
Tien voila le code si tu veut...

Option Compare Database
Function MassMailing()


Dim db As Database
Dim rs As DAO.Recordset
Dim ChaineMail As String
Dim X


Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT Mail_Client FROM CLIENTS WHERE Envoi_Mail_Client=False AND Mail_Client<>'';")


ChaineMail = ""
Do While Not rs.EOF
ChaineMail = ChaineMail & rs(0) & "; "
rs.MoveNext
Loop


X = Shell("C:\Program Files\Outlook Express\msimn.exe " & "/mailurl:mailto:" & ChaineMail, vbNormalFocus)


End Function

Tu notera bien les Mail_Client FROM CLIENTS et non je ne suis pas un spammeur MDr
Voila la mon Pb se situe je le repete encore car je veut effectuer la requette dans une table, mais avec comme critere, l'id d'un client contenu dans un formulaire ouvert...

Voila premier malentendu résolu, passon au second, je vient de voir ton second post (je C/C le message dans les deux topic...)


Donc oui maintenant je vais avoir besoin de PC Anywhere eh non !, pas dans un but mal intentionné encore, car en se moment j'effectue mon stage en entreprise dans une societe informatique en Isere.
Cette dernier utilisait jusqu'a present des batch pour effectuer un transfert entre 2Pc, pour un magasin d'outillage, ils zippaient plusieur fichiers en un Zip, et l'envoyait sur le second pc et le dezippait la bas.
Dernierement ils sont passé a Pc Anywhere, et l'usage de sBatch est devenu impossible et non pratique, ils me demande donc de creer un prog qui génererai un Exe (adapté a un cas precis pas forcement celui du magasin d'outillage, il fau tke le log serve pr d'autre cas...) avec les info qu'il souhaiterai, c'est la raison pour lakel il faut que mon programme génere un Exe a partir d'une Page VB (en fait avec mon prog je devrai arriver a generer tt le code nécéssaire et a le rentrer dans une variable ou autre pour le colelr dan sune page et generer le EXE...

Voila c'est aussi simple que sa,
J'espere qu etu me croit maintenant, car la il y a vraiment eu un malentendu...
Aller sans rancunes MErci ++ -BUZZ-
0
cs_CanisLupus Messages postés 3757 Date d'inscription mardi 23 septembre 2003 Statut Membre Dernière intervention 13 mars 2006 21
24 mai 2005 à 22:09
OK, maintenant, c'est clair. Mais tu avoueras que ce genre de questions, sans être parano, peut susciter certaines pensées.
Bon, pour ce qui est de créer un prog qui générerait un exe en vb ou vba, je ne peux pas t'aider. A la limite, à la place du zip, tu envoies un autoextractible.
Pour l'envoi par mail, si tu en as toujours besoin, je te posterai un exemple demain sur ton autre topic, juste le temps que je le retrouve, ce soir, je n'ai plus trop le temps.

@++

-------------------------------------------------
Dresseur de puces, .... normal pour un loup !?
0
BUZZ2K Messages postés 64 Date d'inscription lundi 4 octobre 2004 Statut Membre Dernière intervention 14 septembre 2008
24 mai 2005 à 22:44
Re Oui, je consoit que tu ait pu mal interpreter mon histoire et me smultipost, car c'etait ambigue c pour sa que j'ai mit sans rancunes ;) par contre pour envoyer les mail, je n'ai aucun soucis, mon pc vien jsute du fait d efaire comprendre a VBA qu'une de mes contraintes est dans le Formulaire actuellement ouvert au moment de l'execution du prog... MErci piur les reponse ;)
0
Rejoignez-nous