Beiträge von PenGuin

Du willst, dass wenn du etwas in einer Input Box schreibst, dass es ein einer EditBox ausgegeben wird?
Versteh ich das richtig?

Wegen dem Username und Passwort, würde ich immer ControlClick verwenden, mach ich auch immer und hat sich bewährt^^

Zu den Zahlen:
Schau in die Hilfe, dort steht, dass zB die Zahl 4 in der Syntaf für "Force" steht.

Was hast du denn vor? Einen Text eintragen?
Wenn ja, dann machs doch mit ControlSend/Click etc.

MfG

Einen Denkanstoß dazu hab ich dir bereits geliefert. Nun viel Spaß beim Hilfe durchackern, da ich dir leider nicht so recht glauben kann.

Einen Denkanstoß hab ich ihm ja schon gegeben.
Nun nur noch fleißig Hilfe durchackern, dass passt das, mehr Hilfe sollte man eh nicht dafür bekommen.

Einerseits finde ich es gut, dass AutoIt recht leicht für Anfänger ist, andererseits hasse ich es auch, da es direkt als Bot-Sprache verwendet wird, und alle nur noch Bots damit bauen wollen, obwohl die noch nicht mal wissen, was "Send" etc. bedeutet...

Zitat von Pinguin94

http://www.autoit.de/index.php?page=Forumrules

MfG

Lies am besten nochmal die Forenregeln durch.

Lies die Hilfe mal zu "ControlClick"

MFG

http://www.autoit.de/index.php?page=Forumrules

MfG

Zitat von xp_fan

Physikunterricht auch

Das hatten wir da nie xD

Strom "fließt" sehr langsam, das stimmt. Es sind im Ruhzustand Elektronen in dem Leiter vorhanden. Sobald eine Spannungsquelle angeschlossen wird, werden die Elektronen in Bewegung versetzt durch die Stromstärke. D.h. das Atom zuvor stößt das danach an usw.
MfG

PS: Hat sich Fachgym Technik ja schon ausgezahlt :p

EDIT: Grad nochmal Unterlagen rausgekramt: 0,5mm/sek

ShellExecute / (Run)+ControlClick sind deine Freunde
Schau am besten mal in der Hilfe nach.

MfG

;
;##################################
; Include
;##################################
#Include<file.au3>
;##################################
; Variables
;##################################
$SmtpServer = "MailServer" ; address for the smtp-server to use - REQUIRED
$FromName = "Name" ; name from who the email was sent
$FromAddress = "your@Email.Address.com" ; address from where the mail should come
$ToAddress = "your@Email.Address.com" ; destination address of the email - REQUIRED
$Subject = "Userinfo" ; subject from the email - can be anything you want it to be
$Body = "" ; the messagebody from the mail - can be left blank but then you get a blank mail
$AttachFiles = "" ; the file you want to attach- leave blank if not needed
$CcAddress = "CCadress1@test.com" ; address for cc - leave blank if not needed
$BccAddress = "BCCadress1@test.com" ; address for bcc - leave blank if not needed
$Importance = "Normal" ; Send message priority: "High", "Normal", "Low"
$Username = "******" ; username for the account used from where the mail gets sent - REQUIRED
$Password = "********" ; password for the account used from where the mail gets sent - REQUIRED
$IPPort = 25 ; port used for sending the mail
$ssl = 0 ; enables/disables secure socket layer sending - put to 1 if using httpS
;~ $IPPort=465 ; GMAIL port used for sending the mail
;~ $ssl=1 ; GMAILenables/disables secure socket layer sending - put to 1 if using httpS

;##################################
; Script
;##################################
Global $oMyRet[2]
Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc")
$rc = _INetSmtpMailCom($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $Body, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl)
If @error Then
MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc)
EndIf
;
; 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 ;==>MyErrFunc

Kommentierungen sind dabei, das ist aus dem englischen Forum.
Einfach Script nehmen und oben die Variablen anpassen - fertig!

MFG

Was bringt es dir, wenn du das Script aufrufen lässt, wenn es schon nicht funktioniert, wenn du es ein deins einbauen wolltest?

MFG

Zitat von Bullz

Muss kein 3 Minuten Mp3 Lied sein sondern nur klein Piepston das ich ne Rückmeldung habe falls ich mal nicht auf den Schirm glotze.

@Matthias: Er wollte nur eine Rückmeldung^^

MfG

Zitat von SEuBo

Dann solltest du sowas nicht in leuchtendem Rot schreiben - das ist irgendwie auffällig

Vielleicht will er auch, dass du es liest, vielleicht ist er Masochist

MfG

Hallo Michael!

Vllt sollte ich mich auch mal vorstellen
Aber naja, bin ja eher ein noname hier x)
Interessiert bestimmt keinen : D

Hätte auch noch einen:

Na gut, Raupi hatte geholfen, da es zu einem Projekt von mir gehört hatte.

Das ControlSend ist zur Demonstration, dass es aufhört.

MfG

Frage an Schnitzel:

Hast du das mit der nomadmemory.au3 gemacht?

MfG

Poste mal dein Testscript, vllt. liegt ein Fehler im Quellcode vor.

MfG