Könnt ihr mir helfen, ich will ein Kontakt Formular machen wo man nicht seine E-mail angeben muss sondern wo einfach nur abschiecken tut also keine webmail und alles.
Mit Betreff und Naricht.
MfG
Könnt ihr mir helfen, ich will ein Kontakt Formular machen wo man nicht seine E-mail angeben muss sondern wo einfach nur abschiecken tut also keine webmail und alles.
Mit Betreff und Naricht.
MfG
Da musste schon etwas genauer werden.
Wie willst du etwas verschicken?
Einfach ein Kontakt Formular. Wenn man Betreff und Naricht eingibt und auf absenden klickt dann wird di naricht und alles an meine email geschieckt
_INetMail
[/autoit]könte helfen ;).
ich will ja ned das programme sich öffnen sondern einfach abschiecken
Einfach ein Kontakt Formular. Wenn man Betreff und Naricht eingibt und auf absenden klickt dann wird di naricht und alles an meine email geschieckt
Ja aber ohne Absender wirste wohl kaum eine E-Mail versenden können.
Du kannst dir natürlich ne adresse bei web oder sonst was anlegen und dann diese als Absender verwenden.
Dazu musst du halt die Daten fest in dein Skript eintragen.
genau
Ich will das des dann an unsere support email geschieckt wird und die gebe ich dann fest in den script ein
ja also.
Und das geht ja nicht anders als ne ganz normale web.de Mail zu versenden.
Dazu gibts ja schon 100 threads...
Ich will das in ein autoit script machen, threads hab ich ned gefunden.
Des kann doch nicht so schwer sein (auser für mich =) ) 3 zeilen zu machen Betreff, Naricht und den Absender Button der das was im Input steht einfach an meinee email sendet???
Es ist auch nicht so schwer, aber du brauchst in deinem script eine absender emailadresse.
Oder du connectest selbst zu einem Emailserver.
aber ohne wirds nicht gehen.
ja dann nehm ich eien absender email von mir selbst dann halt
könnt ihr mir da helfen
Hallo EpicWorld,
Ich will das in ein autoit script machen, threads hab ich ned gefunden.
Des kann doch nicht so schwer sein (auser für mich =) ) 3 zeilen zu machen Betreff, Naricht und den Absender Button der das was im Input steht einfach an meinee email sendet???
Wenn der Anwender sowieso seine Daten eingeben muss, dann ist
[autoit]_INetMail
[/autoit]am einfachsten, denn es übergibt dem Standard-Email-Client einfach die Daten, kein lästiges Suchen nach Informationen Servernamen etc.
Zitat von Hilfe_INetMail
Öffnet das Standard-E-Mail Programm mit vorgegebener Adresse, Überschrift und Inhalt.
#include <INet.au3>
_INetMail ( $s_MailTo, $s_MailSubject, $s_MailBody
oder du nimmst
[autoit]_INetSmtpMail
[/autoit]
web.de funktioniert so
#include <INet.au3>
#include <pop3.au3>
$benutzer = "BenutzerName@web.de"
$pass = "Passwort"
$popserver = "pop3.web.de"
$s_SmtpServer = "smtp.web.de"
$s_FromName = "EpicWorld"
$s_FromAddress = "AbsenderName@web.de" ;üblicherweise gleich $benutzer
$s_ToAddress = "EmpfaengerName@IrgendEinMaildienst.de"
$s_Subject = "Meine Test UDF"
$Pop3OK = _POP3Connect($benutzer, $pass, $popserver) ;wird bei manchen Mailern zur Authentifizierung benötigt
$Pop3Err = @error
if $Pop3OK Then
$Response = _INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, @ComputerName, -1, True); wobei der Parameter true weggelassen werden kann, dann erscheint aber nicht das Trace-Fenster das man zur Fehleranalyse benutzen kann.
$err = @error
If $Response = 1 Then
MsgBox(0, "Erfolg!", "Die E-Mail wurde versandt")
Else
MsgBox(0, "Fehler!", "Das versenden der E-Mail schlug fehl. Fehlercode: " & $err)
EndIf
_Pop3Quit()
_POP3Disconnect()
Else
ConsoleWrite("Pop3-Fehler: " & $Pop3Err & @CRLF)
EndIf
dazu benötigst du auch noch die pop3.au3, da zur Authentifzierung man sich bei manchen Smtp-Servern zuerst über Pop3 anmelden muss aber wie bereits gesagt nimm _INetMail dann ist alles bereits konfiguriert und klappt.
Ansonsten muss ich Schnitzel
ja also.Und das geht ja nicht anders als ne ganz normale web.de Mail zu versenden.Dazu gibts ja schon 100 threads...
recht geben. Wir sind hier kein Machmal-Forum, benutze einfach die SUchFUnktion des Boards. Die GUI dazu musst dir aber selber schnitzen,
mfg (Auto)Bert
dankee, aber da sieht man auch wieder das eine eemail gesendet wurde, das will ich ja nicht und das ist ja bei einem kontakt formular auch nicht so,
naja ich schau mich mal um
und das ist ja bei einem kontakt formular auch nicht so,
Ich ahne, was du willst - aber warum sagst du das dann nicht.
Er will ein Kontaktformular auf einer Webseite haben (oder liege ich falsch?).
Da verwendest du dann den Mailserver des Seitenbetreibers (also den eigenen) um die Mail des Seitenbesuchers zu versenden.
Dafür gibt es fertige php-Kontaktformulare im Netz, einfach mal suchen.
Ich finde die UDF _INetSmtpMailCom ganz gut:
;##################################
; Include
;##################################
#Include<file.au3>
;http://www.autoitscript.com/forum/index.ph…ndpost&p=166575
; The UDF
Func _INetSmtpMailCom($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject = "", $as_Body = "", $s_AttachFiles = "", $s_CcAddress = "", $s_BccAddress = "", $s_Importance="Normal", $s_Username = "", $s_Password = "", $IPPort = 25, $ssl = 0)
Local $objEmail = ObjCreate("CDO.Message")
$objEmail.From = '"' & $s_FromName & '" <' & $s_FromAddress & '>'
$objEmail.To = $s_ToAddress
Local $i_Error = 0
Local $i_Error_desciption = ""
If $s_CcAddress <> "" Then $objEmail.Cc = $s_CcAddress
If $s_BccAddress <> "" Then $objEmail.Bcc = $s_BccAddress
$objEmail.Subject = $s_Subject
If StringInStr($as_Body, "<") And StringInStr($as_Body, ">") Then
$objEmail.HTMLBody = $as_Body
Else
$objEmail.Textbody = $as_Body & @CRLF
EndIf
If $s_AttachFiles <> "" Then
Local $S_Files2Attach = StringSplit($s_AttachFiles, ";")
For $x = 1 To $S_Files2Attach[0]
$S_Files2Attach[$x] = _PathFull($S_Files2Attach[$x])
ConsoleWrite('@@ Debug(62) : $S_Files2Attach = ' & $S_Files2Attach & @LF & '>Error code: ' & @error & @LF) ;### Debug Console
If FileExists($S_Files2Attach[$x]) Then
$objEmail.AddAttachment ($S_Files2Attach[$x])
Else
ConsoleWrite('!> File not found to attach: ' & $S_Files2Attach[$x] & @LF)
SetError(1)
Return 0
EndIf
Next
EndIf
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $s_SmtpServer
If Number($IPPort) = 0 then $IPPort = 25
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $IPPort
;Authenticated SMTP
If $s_Username <> "" Then
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = $s_Username
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $s_Password
EndIf
If $ssl Then
$objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
EndIf
;Update settings
$objEmail.Configuration.Fields.Update
; Set Email Importance
Switch $s_Importance
Case "High"
$objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "High"
Case "Normal"
$objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "Normal"
Case "Low"
$objEmail.Fields.Item ("urn:schemas:mailheader:Importance") = "Low"
EndSwitch
$objEmail.Fields.Update
; Sent the Message
$objEmail.Send
If @error Then
SetError(2)
Return $oMyRet[1]
EndIf
$objEmail=""
EndFunc ;==>_INetSmtpMailCom
;
;
; Com Error Handler
Func MyErrFunc()
$HexNumber = Hex($oMyError.number,
$oMyRet[0] = $HexNumber
$oMyRet[1] = StringStripWS($oMyError.description, 3)
ConsoleWrite("### COM Error ! Number: " & $HexNumber & " ScriptLine: " & $oMyError.scriptline & " Description:" & $oMyRet[1] & @LF)
SetError(1); something to check for when this function returns
Return
EndFunc
Edit: BugFix : ich hab das so verstanden, dass er in seinem Programm eine Kontaktfunktion haben möchte.
dankee, aber da sieht man auch wieder das eine eemail gesendet wurde, das will ich ja nicht und das ist ja bei einem kontakt formular auch nicht so,
naja ich schau mich mal um
[autoit]$Response = _INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body, @ComputerName, -1, True)
[/autoit]
; wobei der Parameter true weggelassen werden kann, dann erscheint aber nicht das Trace-Fenster das man zur Fehleranalyse benutzen kann
Nein, du musst nur den Parameter true weglassen
Ich finde die UDF _INetSmtpMailCom ganz gut
die ist auch besser, dann muss er aber eine Möglichkeit zur Konfiguration proggen, da nicht jeder (Free-)Mailer den Standardport 25 benutzt,
mfg (Auto)Bert
Könnt ihr mir nochmal den kompletten funktionierenden script schreiben
Könnt ihr mir nochmal den kompletten funktionierenden script schreiben
Mein Skript funktioniert, im Board gibt es auch weitere funktrionierende Lösungen
Ansonsten muss ich Schnitzel
Zitat von »Schnitzel«
ja also.Und das geht ja nicht anders als ne ganz normale web.de Mail zu versenden.Dazu gibts ja schon 100 threads...recht geben. Wir sind hier kein Machmal-Forum, benutze einfach die SUchFUnktion des Boards.
Poste also erst einmal dein Skript, damit man sieht welche der 3. genannten Möglichkeiten du genommen hast und wie du es umgesetzt hast,
mfg (Auto)Bert