VooDoo1981

Hey danke dir GOOS, dein tip war wirklich gut, hat gleich funktioniert nochmals n super dankeschön an dich

arbeitsplatz - dann rechte maustaste auf die gewünschte festplatte bzw partition - eigenschaften - extras - der 2te punkt is der für die defragmentierung hoffe ich konnte dir helfen:cool:

Ich habe in Excel 97 per Makroaufzeichnung den Code zum aktivieren des Blattschutzes aufgezeichnet, sowie den Code zum deaktivieren. Leider funktioniert der Code nicht, dh. wenn ich per Button_Click den Blattschutz aktivieren will gibt er mir eine Fehlermeldung. Ich habe das gleiche mit einer Excel 2000 und XP Version versucht da funktioniert es ohne Fehler, ich denke nun das es an der Excel Version liegt. Aber wieso kann ich in der 97er Version ein Makro aufzeichnen das gar nicht funktioniert. Gibt es vielleicht eine Möglichkeit das, dass ganze auch in einer 97er Version funktioniert. Für Hilfe wäre ich sehr dankbar. Hier noch die Fehlermeldung: Laufzeitfehler 1004 die unprotect methode des worksheet-objekts ist fehlerhaft Hier mein Code: Sub BlattschutzEin() Range("E13").Select ActiveCell.FormulaR1C1 = "Blattschutz aktiviert!" ActiveSheet.Protect DrawingObjects:=True, Contents:=True, Scenarios:=True End Sub Sub BlattschutzAus() ' ' Makro3 Makro ' Makro am 06.09.2002 von Dominik Grundgeir aufgezeichnet ' ' ActiveSheet.Unprotect Range("E13").Select ActiveCell.FormulaR1C1 = "Blattschutz deaktiviert!" End Sub

jo des mit dem to war richtig, weils n schlüsselwort is hat ers net akzeptiert danke

Kompilierungsfehler in Microsoft VBScript-Fehler '800a03f2' Bezeichner erwartet /dominik/patente/test.asp, Zeile 22 sub sende_patentauswertung (to, from, reply, subject, patentnr) kann mir bitte einer weiterhelfen. Ich kann mir unter Bezeichner erwartet nichts vorstellen und in büchern find ich auch nichts. Über Anregungen bzw. Lösungen würd ich mich freun DANKE

Hallo ich habe folgenden ASP Code zum serverseitigen mail verschicken geschrieben (hat gefunzt). Jetzt hab ich im mail.body nee for each schleife eingebaut und seitdem haut des nicht mehr hin. Kann mir jemand sagen ob der code falsch ist und was ich ändern muss. <% myListe = "DE_20114231,DE_20115055,EP_0704780" myFeld = Split(myListe, ",") ... .. ... objMail.Body = "Absender: " & Request.Form("Name") & vbcrlf & _ "Bewertung: " & vbcrlf for each eintrag in myFeld eintrag & "=" & Request.Form("eintrag") next "Kommentar: " & vbcrlf &_ Request.Form("comment") objMail.Send

schau ich mir gleich mal an

ich hoff des bringt mich erst mal weiter

Hallo, ich will einen Hitszähler mit ASP machen aber find dazu absolut keinen Anhaltspunkt in meinem Buch. Weiß vielleicht jemand wie man einen macht oder wo man infos herbekommt. Super wäre wenn mir einer nen fertigen Code hätte. Danke

danke danke danke:p

also wie du siehst will ich halt in den body von ner mail was reinschreiben, wo soll ich des response.write jetzt hintun damit ich hier nach jeder zeile code einen zeilenumbruch in der späteren mail habe? danke objMail.Body = "Bewertung: " & _ " |DE 20114231 U1|=" & Request.Form("DE_20114231") & _ " |DE 20115055 U1|=" & Request.Form("DE_20115055") & _ " |EP 0704780 B1|=" & Request.Form("EP_0704780") & _ " |EP 0770941 B1|=" & Request.Form("EP_0770941") & _

Hallo, kann mir jemand sagen wie ich in ASP nen Zeilenumbruch machen kann. Bei HTML is es ja einfach nur <br>. Danke

<% if Request.Form.Count>0 then 'Formulardaten auswerten on error resume next 'Mailobjekt anlegen: set mail = CreateObject("CDONTS.Newmail") 'Ausfüllen: mail.from = Request.Form("from") mail.to = Request.Form("to") mail.cc = Request.Form("cc") mail.bcc = Request.Form("bcc") mail.importance = CLng(Request.Form("importance")) mail.subject = Request.Form("subject") mail.body = Request.Form("body") 'Absenden mail.send if err.number=0 then Response.Write"<p><i>E-Mail wurde erfolgreich versendet!</i></p>" else Response.Write"<p><i>E-Mail konnte nicht versendet werden!</i></p>" end if set mail = Nothing end if %> <form method="POST" enctype="text/plain"> <h4>E-Mail-Versandformular</h4> <p><input type="text" name="from" size="30"> Ihre Absenderadresse</p> <p><input type="text" name="to" size="30"> Empfängeradresse(n)</p> <p><input type="text" name="cc" size="30"> Kopien an folgende Empfänger (Cc)</p> <p><input type="text" name="bcc" size="30"> versteckte Kopien an folgende Empfänger (Bcc)</p> <p>Wichtigkeit der Nachricht:</p> <p><input type="radio" value="0" name="importance">niedrig<br> <input type="radio" name="importance" value="1" checked>normal<br> <input type="radio" name="importance" value="2">hoch</p> <p>Ihre Nachricht:</p> <p><input type="text" name="subject" size="71"><br> <textarea rows="7" name="body" cols="75"></textarea></p> <p><input type="submit" value="Abschicken"><input type="reset" value="Zurücksetzen"></p> </form>

Hallo, ich habe folgenden asp code zum abschicken einer mail vom server aus geschrieben, aber in meinem buch is nix näher beschrieben wie ich des ganze jetzt an den server schicken kann, ich glaub das es da ne submit funktion geben sollte, kenn aber die genaue syntax nicht. kann mir jemand vielleicht den submit befehl den ich hier noch einfügen muss geben DANKE <% Dim objNewMail set objNewMail = Server.CreateObject("CDONTS.NewMail") objNewMail.MailFormat = 0 objNewMail.From = "dominikgrundgeir@kuka-roboter.de" objNewMail.To = "dominikgrundgeir@kuka-roboter.de" objNewMail.Subject = "test" objNewMail.Body ="testtest" objNewMail.Send Response.write("Mail was Sent") set objNewMail = nothing document.submit %>

Hallo, ich hab folgenden code geschrieben und weiß nicht ob er richtig ist bzw. ob noch was fehlt. Also des problem is wenn ich absender und empfänger eingetragen haben und auf absenden drücke dann schauts aus als würde des formular zum server abgschickt werden, welcher ja dann die mail rauschicken sollte aber beim empfänger kommt nix an. über Hilfe wäre ich sehr froh

Hallo, ich bräuchte Hilfe bei der Einrichtung des SMTP Dienstes, kann mir jemand eine Beschreibung geben bzw. weiß jemand wo ich eine her bekomme.

also ich hab jetzt hier nen code, kann ich den einfach so nehmen und als htm speichern und dann ausprobieren oder fehlt da noch so was wie n submit butten, wenn ja kannst du mir da genaueres sagen wie ich des machen muss. <% Dim objMail Set objMail = Server.CreateObject("CDONTS.NewMail") objMail.From = "rob@tconsult.com" objMail.Subject = "How TO send email with CDONTS" objMail.To = "someone@someplace.com" objMail.Body = "This is an email message" & vbcrlf&_ "with CDONTS." & vbcrlf&_ "It is really easy. " objMail.Send Response.write("Mail was Sent") 'You must always do this with CDONTS. set objMail = nothing %>

ok danke dir erst mal, ich schau mir die links mal an aber ich hab dann garantiert noch fragen. Gruß

Danke dir für die links, aber ich hab leider nichts passendes gefunden und da ich absoluter anfänger bin sagt mir da vieles auch gar nichts. das was du mir gerade geschrieben hast hört sich aber gut an kannst du mir vielleicht beschreiben wie ich bzw wo ich des in meinem code einbauen muss und was ich dann rauslassen soll. schon jetzt mal n großes danke

ok des mit dem response.write hab ich gemacht mein problem liegt darin das ich die seite zwar abschicken kann jedoch keine mail ankommt. kann es sein das ich den smtp dienst falsch konfiguriert habe falls ja, hast du mir ne beschreibung wie ich des unter nt server machen kann danke

Hallo, ich bräuchte Hilfe bei folgendem Problem, ich will daten an den server schicken und dieser soll mir dann eine Mail mit Inhalt (Daten ) zuschicken. Zum testen hab ich jetzt mal n kleines Programm geschrieben das mir wenn man absender und empfänger eingetragen hat ne mail vom server aus schicken sollte. <% if Request.Form.Count>0 then 'Formulardaten auswerten on error resume next 'Mailobjekt anlegen: set mail = CreateObject("CDONTS.Newmail") 'Ausfüllen: mail.from = Request.Form("from") mail.to = Request.Form("to") mail.cc = Request.Form("cc") mail.bcc = Request.Form("bcc") mail.importance = CLng(Request.Form("importance")) mail.subject = Request.Form("subject") mail.body = Request.Form("body") 'Absenden mail.send if err.number=0 then <p><i>E-Mail wurde erfolgreich versendet!</i></p> else <p><i>E-Mail konnte nicht versendet werden!</i></p> end if end if %> <form method="POST" enctype="text/plain"> <h4>E-Mail-Versandformular</h4> <p><input type="text" name="from" size="30"> Ihre Absenderadresse</p> <p><input type="text" name="to" size="30"> Empfängeradresse(n)</p> <p><input type="text" name="cc" size="30"> Kopien an folgende Empfänger (Cc)</p> <p><input type="text" name="bcc" size="30"> versteckte Kopien an folgende Empfänger (Bcc)</p> <p>Wichtigkeit der Nachricht:</p> <p><input type="radio" value="0" name="importance">niedrig<br> <input type="radio" name="importance" value="1" checked>normal<br> <input type="radio" name="importance" value="2">hoch</p> <p>Ihre Nachricht:</p> <p><input type="text" name="subject" size="71"><br> <textarea rows="7" name="body" cols="75"></textarea></p> <p><input type="submit" value="Abschicken"><input type="reset" value="Zurücksetzen"></p> über hilfe würde ich mich sehr freuen gruß

ich möchte auf meiner homepage die möglichkeit schaffen zwischen vier verschieden musikstücken zu wählen die im hintergrund laufen sollen und am besten nur immer der refreant sich wiederholt. Hat mir vielleicht jemand einen vorschlag oder nen code.:confused: bitte mailt mir !!! DANKE