cs_mays
Messages postés15Date d'inscriptionjeudi 6 février 2003StatutMembreDernière intervention24 septembre 2014 2 févr. 2010 à 21:39
Salut
Blat est un petit prog qui permet d'envoyer des emails en lignes de commandes
Je reconnais que j'ai surtout fait du VB6 et que pour le .Net pour l'instant je récupère des fonctions à droite à gauche suivant ce dont j'ai besoin.
J'ai utilisé un point ini car les collègues qui utilisent le prog et qui n'ont pas l'habitude du xml sont plus à l'aise avec un fichier ini.
Je prend note de tes remarques, je vais essayé de prendre le temps de le corriger et mieux faire la prochaine fois.
@+
elguevel
Messages postés718Date d'inscriptionjeudi 19 décembre 2002StatutMembreDernière intervention22 novembre 20163 2 févr. 2010 à 08:25
Au premier coup d’oeil je dirais que tu as fait beaucoup de VB avant de faire du .Net !
Alors déjà c’est quoi Blat ? :-s
Sinon çà je ne pense pas que çà serve à grand-chose "Imports System.Object", Object est une classe et non un espace de nom
Je vois également que tu as utilisé un gros bloc de variable déclaré en Public.
En fait ta classe n’est pas une classe, il n’y a pas de constructeur, aucun passage de paramètre, çà ressemble plus à un module.
Tu devrais regarder des articles sur la POO, il y en a pas mal sur la toile.
De plus tes declarations comme "Public dossier_archives$" serai un peu mieux comme çà : "Public dossier_archives as String"
Sinon pas obligatoire mais tu peux faire plus court si tu veux :
Dim monStreamWriter1 As StreamWriter = New StreamWriter( ...
Dim monStreamWriter1 As New StreamWriter( ...
Tu fais un monStreamWriterX.Close, mais n’oublie pas pour des soucis d’optimisation de faire un monStreamWriterX.Dispose (ou utilise un bloc Using...End Using) pour libérer l’objet
Shell ... arf, çà existe encore çà ? Regarde si tu ne peux pas utiliser la Class Process.
Fais gaffe à çà : dossier_archives + "" + ...
Si tu te trouve dans la racine du disque (ex : C:\), le "" va être doublé !
fermetureauto = "Oui" -> un boolean ne serait pas mieux ?
Après essai pour ton fichier de config de passer dans un autre format comme le XML, puisqu’a ma connaissance Microsoft ne veut plus maintenir le .INI (pas de classe présente dans .Net)
Public Function GetCle(
[code]
GetCle = Chaine
End Function
Stop, en .Net on retourne le résultat d’une fonction avec Return et non le nom de la fonction.
Là t’a laissé trainé çà :
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
Ca ne sert à rien, et de plus ta classe n’hérite pas de Windows.Form !? ( = Ce n'est pas un formulaire)
Comment tu as pu créer une listbox la dessus ?
Dim TmpName As String = Microsoft.VisualBasic.Mid(Entree, Len(dossier_temp$) + 1)
TmpName = Replace(TmpName, "'\'", "") 'récupérer le nom du fichier
-> Là aussi essai de te documenter sur la Class String (String.SubString(), String.Replace(), etc..)
Allé corrige nous tous çà ... et mets toi à l'objet, tu verra c'est super sympa ;-)
3 févr. 2010 à 08:13
Sinon il y plus simple pour envoyer des mails, .Net l'implémente déja.
Il faut importer "Imports System.Net.Mail" et puis celà doit suffir :
Dim MonSMTP As New SmtpClient("ServeurDeMail")
MonSMTP.Send("moi@domaine.fr", "lui@domaine.fr", "Sujet", "Mon message")
Sinon l'INI pourquoi pas, mais bon le XML étant à la mode, pourquoi ne pas s'y mettre :-)
Pour débuter ce cours est pas mal : http://plasserre.developpez.com/cours/vb-net/
Bon code ...
2 févr. 2010 à 21:39
Blat est un petit prog qui permet d'envoyer des emails en lignes de commandes
Je reconnais que j'ai surtout fait du VB6 et que pour le .Net pour l'instant je récupère des fonctions à droite à gauche suivant ce dont j'ai besoin.
J'ai utilisé un point ini car les collègues qui utilisent le prog et qui n'ont pas l'habitude du xml sont plus à l'aise avec un fichier ini.
Je prend note de tes remarques, je vais essayé de prendre le temps de le corriger et mieux faire la prochaine fois.
@+
2 févr. 2010 à 08:25
Alors déjà c’est quoi Blat ? :-s
Sinon çà je ne pense pas que çà serve à grand-chose "Imports System.Object", Object est une classe et non un espace de nom
Je vois également que tu as utilisé un gros bloc de variable déclaré en Public.
En fait ta classe n’est pas une classe, il n’y a pas de constructeur, aucun passage de paramètre, çà ressemble plus à un module.
Tu devrais regarder des articles sur la POO, il y en a pas mal sur la toile.
De plus tes declarations comme "Public dossier_archives$" serai un peu mieux comme çà : "Public dossier_archives as String"
Sinon pas obligatoire mais tu peux faire plus court si tu veux :
Dim monStreamWriter1 As StreamWriter = New StreamWriter( ...
Dim monStreamWriter1 As New StreamWriter( ...
Tu fais un monStreamWriterX.Close, mais n’oublie pas pour des soucis d’optimisation de faire un monStreamWriterX.Dispose (ou utilise un bloc Using...End Using) pour libérer l’objet
Shell ... arf, çà existe encore çà ? Regarde si tu ne peux pas utiliser la Class Process.
Fais gaffe à çà : dossier_archives + "" + ...
Si tu te trouve dans la racine du disque (ex : C:\), le "" va être doublé !
fermetureauto = "Oui" -> un boolean ne serait pas mieux ?
Après essai pour ton fichier de config de passer dans un autre format comme le XML, puisqu’a ma connaissance Microsoft ne veut plus maintenir le .INI (pas de classe présente dans .Net)
Public Function GetCle(
[code]
GetCle = Chaine
End Function
Stop, en .Net on retourne le résultat d’une fonction avec Return et non le nom de la fonction.
Là t’a laissé trainé çà :
Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChanged
Ca ne sert à rien, et de plus ta classe n’hérite pas de Windows.Form !? ( = Ce n'est pas un formulaire)
Comment tu as pu créer une listbox la dessus ?
Dim TmpName As String = Microsoft.VisualBasic.Mid(Entree, Len(dossier_temp$) + 1)
TmpName = Replace(TmpName, "'\'", "") 'récupérer le nom du fichier
-> Là aussi essai de te documenter sur la Class String (String.SubString(), String.Replace(), etc..)
Allé corrige nous tous çà ... et mets toi à l'objet, tu verra c'est super sympa ;-)