Gateway_man

hi leute, hab grad in der Arbeit irgendwo n Problem (ich weiß ich recht mager beschrieben aber ich sitz daheim und hab den quellcode nicht zu hand und versuch diesen part der anwendung zu rekapitulieren). Hab mir mal ne consolenanwendung zusammengeschrieben die zwar eine abgespeckte version ist aber die fast das selbe tätigt: Sub Main() Dim time As String Dim ho(1) As String Dim path1 As String time = DateTime.Now ho = Split(Tri***(time), " ") Console.Write(ho(0)) Console.Read() path1 = "test\" & ho(0) & "\" & "simon\" If My.Computer.FileSystem.DirectoryExists(path1) Then Console.WriteLine("Path1 does exist") Console.Read() Else My.Computer.FileSystem.CreateDirectory(path1) Console.WriteLine("Path1 doesn't exist") Console.Read() End If Dim writer As New System.IO.StreamWriter(path1 & "test.txt", False, System.Text.Encoding.Default) writer.Write("it does work") writer.Close() Console.WriteLine("finish") Console.Read() Console.WriteLine(My.Application.Info.DirectoryPath) Console.Read() End Sub Der Witz ist ja eigentlich bei mir funktionierts einwandfrei. OK ich hab da jetzt wirklich viel weggelassen (wo man fehler machen kann). Ich versuchs mal zu erläutern was ich genau machen will. Wie vielleicht aus meinem vorherigen thread schon herausgeht schreib ich momentan ne anwendung zum versenden von email (die auf einer sql Datenbank zurückgreift). So nun wollte ich noch eine möglichkeit einbauen, die versendeten Mails in einem vordefinierten Ordner als txt zu speichern. Beispiel: -Den Übergeordnete Ordner nennen wir mal Mail-Backup -In diesem Ordner werden die Mails in weitere Ordner die zur übersichtlichkeit dienen gespeichert. Der ordnername ist abhängig von dem jeweiligen Datum an welchem die Mails verschickt wurden. (was ich auch interessant fand war, das es keine expliziete funktion gibt die nur das Datum ausgiebt sonder wenn dann nur Datum & Uhrzeit, sprich man muss diese in ein string packen und spliten) -In dem jeweiligen Ordner befinden sich dann noch unterordner die namendlich mit den versendeten Mailadressen versehn werden. Darin befinden sich dann die Kopien die mit dem Betreff benannt wurden. Ich hatte dies schon einmal geschafft er machte es mir dann auch. Nur hatte ich dann noch veränderungsvorschläge und dannach gings nichtmehr. Wünsche noch einen schönen Abend Simon

ich glaube es ging nur darum nicht nocheinmal den selben quellcode hinzuklatschen, sondern den bereits gefüllten taple zu nehmen, was ja so nicht geht (AFAIK). mfg

sind doch draußen ?!?!?! Warum ich die Textbox2 noch benutze? Habs noch nicht geändert da hab ich zuvor die Empänger übertragen.

habt dank ihr beide hier nochmal der vollständige funktionierende code: (Die prioritäten hab ich mal raus da es damit noch einige probleme gibt) For Each item As String In ComboBox1.Items TextBox2.Text = item Dim mail As New Net.Mail.MailMessage() mail.From = New Net.Mail.MailAddress("ABSENDER") mail.To.Add(TextBox2.Text) mail.Subject = TextBox1.Text mail.Body = RichTextBox1.Text mail.IsBodyHtml = True 'If low.Checked = True Then ' mail.Priority = Net.Mail.MailPriority.Low 'ElseIf Normal.Checked = True Then ' mail.Priority = Net.Mail.MailPriority.Normal 'ElseIf High.Checked = True Then ' mail.Priority = Net.Mail.MailPriority.High 'End If Try mail.Attachments.Add(New Net.Mail.Attachment(TextBox3.Text)) Catch End Try Dim smtp As New Net.Mail.SmtpClient("mail.gmx.net") smtp.Credentials = New System.Net.NetworkCredential("USER", "PASSWORD") smtp.Send(mail) mail.Dispose() smtp = Nothing Next MessageBox.Show("Mails sind versendet", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information)

Es würde wie folgt aussehn: For each (eben hier liegt mein problem da ich nicht weiß wie ich das mit der combobox anstellen soll, das er mir jeden index durchloopt und den jeweiligen value übernimmt) --------------------------------------------------------------------- 'Der Rest ist mir durchaus bekannt Dim mail As New Net.Mail.MailMessage() mail.From = New Net.Mail.MailAddress("Absender") mail.To.Add(TextBox2.Text) mail.Subject = TextBox1.Text mail.Body = RichTextBox1.Text mail.IsBodyHtml = True If low.Checked = True Then mail.Priority = Net.Mail.MailPriority.Low ElseIf Normal.Checked = True Then mail.Priority = Net.Mail.MailPriority.Normal ElseIf High.Checked = True Then mail.Priority = Net.Mail.MailPriority.High End If Try mail.Attachments.Add(New Net.Mail.Attachment(TextBox3.Text)) Catch End Try Dim smtp As New Net.Mail.SmtpClient("SMTP Adresse") smtp.Credentials = New System.Net.NetworkCredential("Username", "PW") smtp.Send(mail) mail.Dispose() smtp = Nothing Next MessageBox.Show("Mails sind versendet", "Information", MessageBoxButtons.OK, MessageBoxIcon.Information)

Bei dem inhalt der Combobox handelt es sich um E-mail Adressen die aus dem vorhergehenden form aus einem Datagridview per selektierung hinzugefügt wurden. Nur habe ich es damals so gemacht das ich alle sleketierten e-mails genommen habe und diese nur mit einem komma getrennt der Textbox die als Empfänger dient hinzugefügt habe. Das hat den großen Nachteil, das alle, dennen ich eine E-mail schicke auch sehen können wer noch eine bekommen hat. Nun wollte ich es ändern und wollte, da ja bekanntlich jede E-mail Adresse ein @ Zeichen beinhaltet, contains benutzen, um alle relevanten Einträge der Combobox getrennt eine E-Mail zukommen lassen. Dies wollte ich dann mit einer For Each schleife realisieren, was grad nicht so klappt :-(

hi, habe eine combobox, deren inhalte per button event in eine Textbox übertragen werden. Jedoch soll für jedes einzelne item eine For each schleife laufen, da jeder eintrag individuell sein soll. Jemand ne idee? Ich hab es versucht mit combobox1.items.contains ("") Da jeder der einträge ein bestimmtes Zeichen beinhaltet das jedoch jeder hat. Jedoch wird das so mit der For each Schleife nicht funktionieren. mfg

hi leute, habe in meinem programm ein modul mit dem man mails über smtp client verschicken kann nun will ich aber auch eine bestätigung, das die Mails angekommen sind. Wäre das möglich und wenn ja wie? lg simon Ps: Visual basic 2005

Ich weiß das ich schonmal darüber gelesen habe, das es angeblich nicht möglich ist aus einer windows form anwendung eine consolenanwendung aufzurufen. Aber es gibt bestimmt alternative wege. als letzte und damit aber bei weitem unprofessionelste lösung wäre eben einfach nur das ich die consolen exe in den selben ordner lege und diese dann von der anwendung heraus starte. Das würde mir aber persönlich weniger gefallen. Wenn euch dazu was einfällt oder ihr was wisst, würde ich mich sehr freuen. mfg simon

Da das anscheinend niemand weiß oder meine Frage nicht ausreichen beschrieben wurde geb ich das mal auf ;-) . Habe so oder so eine neue Frage. Ich möchte mit einem Streamwriter ne ini erstellen. In dieser sollen die vom user eigebenen einstellungen gespeichert werden. Die versuche schlugen fehl es wurde nichts in der Datei gespeichert. Dachte erst es liegt an der Codierung also hab ich folgendes dem streamwriter hinzugefügt: system.text.encoding.default was nichts gebracht hat Ist das erste mal das ich mit ini's arbeite. Hab ich da was zu beachten. Und ja ich weiß das es aus diesem grund config dateien gibt, allerdings beherrsche ich die xml syntax überhaut nicht :old . Mfg Simon

nein selbst das nicht hab mein rechner gestern formatiert und habs mal in der 2ten Reihenfolge installiert also erst des 2008er und dann der 2005er und es ging trotzdem.

hi leute, kann mir mal jemand sagen wie in VS 05 das event das fürs minimieren der Form zuständig ist bezeichnet wurde/wird. Hm hab jetzt schon ein paar getestet allerdings ohne erfolg. Warum kann man dieses nicht einfach minimized nennen oder ähnliches. Mfg Simon

hi leute, vorab hab auf meinem Rechner Windows Vista Ultimate 64 bit. Habe schon seit längerem die Comodo Internet Firewall in benutzung und bisher war ich zu jeder Zeit zufrieden. Nur in letzter Zeit gab es einige probleme und ich muste die Software deinstallieren. Ich wollte diese dann wieder Installieren, jedoch erschien beim starten der msi die Meldung das Programm wäre noch auf meinem Rechner und ich könne dieses durch den klick auf den Ja Button entfernen oder ändern. Wenn ich diese mache schließt sich die msi und es passiert nichts. Dann habe ich mich mal dran gemacht meinen rechner von jeglichen einträgen (registry und sonstiges) die auf die Firewall hinwiesen oder dazugehörten zu entfernen. Jetzt habe ich die msi wieder gestartet und die beliebte Meldung kam wieder. Ich bin jetzt langsam am verzweifeln. Sitze jetzt schon länger an dem beschriebenen Problem. Jetzt wende ich mich voller verzweiflung aber auch voller zuversicht an euch und hoffe jemand kennt dieses Problem und kann mir eventuell helfen. Mfg Simon

hm jep genauso. hab gerade erfahren das der provider alle ports gesperrt hat außer den 80 was klar ist ! Muss mich mal informieren wie des Tunneln funktioniert

probiers mal mit der druckerfreigabe. gib die mal bitte frei

hm hätte ich nicht gedacht. läuft aber wirklich super.

hi leute, bin grad in der Berufschule und würde gerne wissen welche ports außer dem 80 offen sind. und wir haben hier win 2k rechner. gibts da in der eingabeaufforderung nen befehl zum testen vom ports? Wenn ja welche? Mfg simon

Danke dir

hi leute, hat jemand schon mal erfahrungen gemacht ob man beide Versionen sprich visual Studio 05 und 08 auf einem rechner installieren kann? Das einzige problem was mir da einfallen könnte wäre, das dot net welches des 08 installiert dem 2005 probleme bereiten könnte. Wenn ihr euch fragt warum ich das benötige oder frage. Ich benötige 2005 für die Arbeit und das 2008 für Private Projekte. Mfg Simon

habs schon geregelt, danke trotzdem.

ja diesen hab ich neu angelegt, da mein alter kein Passwort hatte. Ja er hat Vollzugriff wenn du das meinst und ist auch als Kontentyp Administrator.

hi leute, komm hier nicht weiter bei der Installation. Hier der link zum screenshot: http://img7.imageshack.us/img7/3618/sql.png Warum nimmt er mir meinen gewünschten nutzernamen und passwort an.

Sowas auf die Idee bin ich jetzt noch gar nicht gekommen Bin schon den ganzen Tag am googlen und am MSDN durchforsten

und wie soll ichs dann machen? Irgendwie muss ich dieses laden können. Ich weiß auf jedenfall das es geht. (sonst hätte ich keine solche aufgabe bekommen)

ja. aber ich öffne dies ja nicht mit einem Texteditor.