Das buch ist sehr sehr gut.
Habe es gerne gelesen.
LG, Crazy-A.
Das buch ist sehr sehr gut.
Habe es gerne gelesen.
LG, Crazy-A.
Also Hallo Doc.
1.) Ich lese auch die ct und andere Zeitschriften. Ausgenommen BRAVO und Co. ![]()
2.) Ich dachte ja, wenn Du Dein Wissen schon nicht verheimlichst, das Du das Ergebnis zeigst.
3.) Gegen Gedächnissprobleme hilft gibt es Medi's. Einfach mal Deinen Frauenarzt oder ...... fragen. LOOOOL
LG, Lina.
Nur wissens- / lesenswert für User die die CHIP 02/2008 haben.
Habe da zwei Beiträge, die mich ansprachen.
Beitrag 1:
Seite 198 Der Punkt 15 (Bero 7 Premium "Brennvorgang bequem per Doppelklick starten"). Geht darum, das man wohl z. B. ein Backup über die Kommandozeile steuern kann.
Beitrag 2:
S. 66 Passwortkarte: "Hunderte Passwörter merken"
Beides sollte doch auch mit AutoIt möglich sein, wenn man bei Beispiel 2 irgendwie über ein Username & Passwort eine Zeichenkette codiert und dann diese in 11 Teile teilt (jeweils eine Zeile mit 22 Buchstaben, Ziffern, Zeichen". Was da die ID macht und der Sec Code bedeuten kann ich zwar nicht sagen, aber evtl. kann das ja jemand heraus bekommen.
LG, Crazy-A.
Klaro erkannt ![]()
LG, Crazy-A(lina)
Hallo GTA.
Also erst einmal habe ich kurz über MTU nachgelesen.
Mein Router sagt klar aus das der MTU-Wert zwischen 576 und 1492 liegen sollte, ratsam wäre ein Wert im unteren Bereich.
60 kann aber somit ein zu geringer Wert sein.
LG, Crazy-A.
Hallo.
Das freut uns doch. Lange nicht gesehen und doch ....
LG, Crazy-A(lina)
Hallo.
Erst einmal: Super gemacht !!!
Sprachen-Templates kannst Du doch gut über http://translate.google.com/translate_t übersetzen. Meine da kannst Du es sogar in japanisch und chinesisch übersetzen. Wäre doch mals was. LOL
Aber mit dem starten z. B. von Defrag, wenn man eh nichts am PC macht ist gut. Kann man auch zwei sachen auf einmal starten? Zum Beispiel "defrag" und ein Film. Dann könnte man nämlich (so denkt Frau) den PC ein Defrag durchlaufen lassen und nebenbei ein Film abspielen, den man sich dann auf den TV-Monitor im Wohnzimmer zuschaltet. Okay, okay, war nur so eine Idee von mir. ![]()
Edit 1:
Habe gerade etwas versucht:
black
D:\Musik\jane.mp3
D:\Musik\jane2.mp3
Das geht aber irgendwie nicht. Entweder nimmt er das erste und der Monitor bleibt "schwarz" oder bei "zufällig wird nur eines der drei Möglichkeiten ausgeführt. Ich dachte das man es so einstellen kann, das zum Beispiel Black eine Minute ausgeführt wird, dann jane abgespielt wird und danach jane2. kann man das irgendwie zeitlich steuern? wenn nicht, dann kann man sich ja ein Script entwickeln das es macht und dieses dann ausführen lassen. Aber ich werde weiter schauen was man damit machen kann. ![]()
Crazy-A
Hallo zusammen.
Die, die schon etwas länger hier sind, wissen ja, das ich mir so ab und an auch mal Gedanken mache, die gar nichts mit dem PC zu tun haben.
Ich frage mich, wie/was soll man denken, wenn man eine E-Mail mit u. a. diesen Zeilen bekommt?
Ja, damals war alles noch viel schöner. Damals, als man noch in der Schule Eckenrechnen in der dritten Klasse spielte. Damals, als es noch den richtigen Winter mit Schnee gab. Damals, als man sich noch nicht so sehr fragte, wozu man eigentlich da ist? Aber eine solche Frage kann man nicht beantworten. Um eine Familie zu gründen? Sollte man das in der heutigen Zeit noch? Wenn man ein Kind in die Welt setzen läßt, läßt man da nicht ein neues Leben in eine total sinnlose Zukunft groß werden? Schon heute werden sogar hochbegabte Kinder im jungen Teenageralter auf Harz-IV und unseren Staat unterrichtet. Gestern wurde eine Studie eröffnet. Voraussichtlich 2020 werden es in Deutschland amerikanische Verhältnisse geben wie sie aus New York bekannt sind. Ghetto, wo die Armen leben, Bereiche wo die Wirtschaft sich in Büros abspielt, große Hafenanlagen (Flug /See)- Industrieanlagen, Wohnbereiche der Reichen und derer die es sich noch erlauben können dort zu leben. Aber ist es eigentlich noch ein Leben oder eher ein dasein in irgend etwas? Dieses irgendetwas Erde?
Laß es soweit einfach mal zur Diskussion stehen.
LG, Crayz-A ![]()
Hallo
Bitte das nächste mal ein etwas aussagekräftigeren Titel als "Ha" auswählen..
MFg Spider
Als ich das Thema in der Übersicht sah dachte ich: "Was, war? Nur ein Ha? Was ist das denn!?"
Bei so einer Überschrift gehste nicht rein. Und dann? Dann hat die Neugierde gesiegt. ![]()
Aber ab und ab kann man darüber auch mal ein
zudrücken. Meine über die Neugirde.
LG, Crazy-A(lina)
@Mega.
Das mal als Kompliment nehme. ![]()
LG, Crazy-A
Hallo Teddy.
Ich hatte Dir doch oben ein lauffähiges Beispiel sogar. mit einer´m InPutfeld das ausgelesen wird gepostet.
Eigentlich hättest Du dort nur Deine Wünsche anpassen müssen. Xenobiologist , ob Du das nicht selber
geschafft hättest ist begründet, denn eigentlich ist das nur ein und ein zusammen ziehen. ![]()
Also einfach etwas hin und her denken, aber da hatte ich selber auch am Anfang Probleme.
Gruß, Crazy-A(lina)
ehm ja
ich kann AutoItv3 net gut
Kann das vll mal wer machen mit den 2 inputboxen und senden dan e-mail senden
MfG
Das sollte gehen, wenn ich Dich richtig verstanden habe:
#include<Inet.au3>
$re = InputBox('Mail send', 'Was willst du senden?')
$input1 = GUICtrlCreateInput("Hier das eintragen, was Du senden möchtest.", 128, 168, 673, 21)
$s_SmtpServer = "smtp.alice-dsl.net"
$s_FromName = @UserName
$s_FromAddress = "***1***@alice-dsl.net"
$s_ToAddress = "***2***@alice-dsl.net"
$s_Subject = "E-mail vom Freund"
$s_UName = "***1***@alice-dsl.net"
$s_PWD = "***1***"
Dim $as_Body[3]
$as_Body[0] = $re
$as_Body[1] = "EIN NEUER ACCOUNT"
$as_Body[2] = Guictrlread($input1)
$Response = _INetSmtpMailAuth($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_UName, $s_PWD, $s_Subject, $as_Body)
$err = @error
If $err Then ConsoleWrite($err & @CRLF)
If $Response = 1 Then
Else
EndIf
Alles andere genauso wie im Original-Script.
Ich wenn falsch gedacht habe, dann melde dich, den Fehler finden wir zusammen schon.
Da kann man ja eine Menge mit senden lassen. ![]()
Crazy-A(lina)
Hallo zusammen.
Ab sofrt ein neuer Nick: Crazy-A.
Warum? Naja, weil mir danach war und ich eigentlich gerade etwas auftraue so privat nach all den Tiefpunkten.
LG, Crazy-A(l...) ![]()
@ Ritzelrocker04
Dann muß ich doch auch die beiden Dateien unter C:\Programme\ haben, oder? Und was ist, wenn auf "C:\" der Ordner "Programme" noch nicht besteht?.
Das Script und die beiden 7z Dateien sind im gleichen Ordner bzw. auf der gleichen Festplatte nämlich die Root von HDD-E.
Lina ![]()
Okay, das teste ich mal.
Danke schön und ich melde mich.
LG, Lina.
Also Geocaching ist bei Kids völlig im Rennen.
Meine Schwester mit ihren drei machen das fast jedes Wochenende. Und hier oben gibt es Wasser, also geht es da auch öfters mal rein.
Aber die machen das übers Handy. Ihr Mann arbeitet bei einer Handyhersteller Firma, die in Flensburg sehr in die neg. Presse gerutscht ist.
Also auch mal ein Spaß für Geburtstagspartys oder Junggesellinnenabschiede. Gibt viele Möglichkeiten.
LG, Lina.
Hallo GtaSpider.
Ja; das hatte ich mir ja auch schon überlegt. Aber die Datei wird ja installiert (FileInstall("\7z.exe", @ScriptDir)). Also weiß ich nicht, wo ich noch den Fehler suchen kann oder wie er entsteht. Ich kann es mir nicht erklären.
Habe auch schon überlegt, ok der RunWait befehl zu schnell aufgerufen wird, also bevor die Datei mit FileInstall installiert ist, aber das geht ja wohl nicht.
Dann dachte ich die Datei wird zu früh gelöscht und war vielleicht mal da (oder wie man das nennen soll). Aber ich meine auch das kann man doch ausschließen, oder?
Kann mich da vielleicht mal BITTE einer aufklären. ![]()
LG, Lina.
Hallo.
Wenn ich das unten stehende Script bei mir auf dem PC ausführe (diesem hier) ausführe, arbeitet es fehlerfrei, auf anderen PC kommt die Meldung
Line-1:
Errot: Unable to execute the external program.
Das System kann die angegebene Datei nicht finden.
#cs
Ich bedanke mich bei GtaSpider, Greenhorn, BugFix King of Array, bernd670 der im Schaukelstehl sitzende Gitarrist,
Oscar bei dem ich das Avatar nicht weiß welches Motiv es ist und Fast2. Ohne Euch wäre ich noch nicht so weit mit AutoIt.
#ce
FileInstall("\7z.exe", @ScriptDir)
FileInstall("\7z.dll", @ScriptDir)
; Variable
Const $A1 = "Bilder kopieren und entpacken." ; SplashTextOn für alle Hinweisfenster
Const $B2 = "Guten Tag." ; SplashTextOn Hinweisfenster
Const $B3 = FileSelectFolder("Auf welchem LAUFWERK $B4 suchen lassen? Spart mir das Ordnerdurchsuchen
", "") ;"?:\" ; Laufwerk wo installiert wird
Const $B4 = "irgendwas.jpg" ; nach welchem Bild darf gesucht werden
Const $C5 = "\3bilderin1dat.exe" ; zu kopierende Datei und gleichzeitig Datei mir 3 Bildern
Const $C6 = "\*.*" ; wohin soll $kopiert werden, hier ist gleiche Verzeichnis
Const $C7 = "\7z.dll"
Const $C8 = "\7z.exe"
Const $D1 = "Die 3 Bilder kommen nun zu dem einen hinzu." ; SplashTextOn Hinweisfenster
Const $D2 = "3bilderin1dat.exe" ; zu löschende Datei nach Erfolg von u. g. RunWait von $C5
Const $E1 = "Gerade noch war es 1 Bild, jetzt sind es 4." ; Meldung das $C5 ausgeführt (?) beendet ist
Const $E2 = "Ich wünsche noch einen schönen Tag. Auf Wiedersehen."
Const $E3 = 2500 ; Anzeigedauer der Fenster in tauselsten Sekunde hier 2,5 Sekunden
SplashTextOn($A1, $B2,400,20,-1,-1,1)
Sleep($E3)
SplashOff()
$filelist = _FileListToArrayEx($B3,$B4) ;Recursive filelist siehe Forumbetrag
If Not IsArray($filelist) Then
If MsgBox(20,"Error",$B4) = 7 Then Exit ; neg = ExitusHopp
Else
$dir = StringLeft($filelist[1],StringInStr($filelist[1],"\",-1,-1))
FileCopy(@ScriptDir & $C5,$dir&$C6)
FileCopy(@ScriptDir & $C7,$dir&$C6)
FileCopy(@ScriptDir & $C8,$dir&$C6)
EndIf
;===============================================================================
; Entpackfunktion
;===============================================================================
SplashTextOn($A1, $D1,400,20,-1,-1,1)
Sleep($E3)
SplashOff()
RunWait(@ScriptDir & $C8 & " x -o""" & $dir & """ " & @ScriptDir & $C5)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit];===============================================================================
; Die Dateien löschen, wenn Script fehlerfrei läuft
;===============================================================================
FileDelete($dir & $C5)
FileDelete($dir & $C7)
FileDelete($dir & $C8)
;FileDelete(@ScriptDir & $C5)
FileDelete(@ScriptDir & $C7)
FileDelete(@ScriptDir & $C8)
;===============================================================================
; Hinweis und ein OKAY ????
;===============================================================================
SplashTextOn($A1, $E1,300,20,-1,-1,1)
Sleep($E3)
SplashOff()
SplashTextOn($A1, $E2,400,20,-1,-1,1)
Sleep($E3)
SplashOff()
;===============================================================================
; SuchArray erstellen ohne oben stehende Variablen
;===============================================================================
Func _FileListToArrayEx($sPath, $sFilter = '*.*', $iFlag = 0, $sExclude = '', $iRecurse = True)
If Not FileExists($sPath) Then Return SetError(1, 1, '')
If $sFilter = -1 Or $sFilter = Default Then $sFilter = '*.*'
If $iFlag = -1 Or $iFlag = Default Then $iFlag = 0
If $sExclude = -1 Or $sExclude = Default Then $sExclude = ''
Local $aBadChar[6] = ['\', '/', ':', '>', '<', '|']
$sFilter = StringRegExpReplace($sFilter, '\s*;\s*', ';')
If StringRight($sPath, 1) <> '\' Then $sPath &= '\'
For $iCC = 0 To 5
If StringInStr($sFilter, $aBadChar[$iCC]) Or _
StringInStr($sExclude, $aBadChar[$iCC]) Then Return SetError(2, 2, '')
Next
If StringStripWS($sFilter,
= '' Then Return SetError(2, 2, '')
If Not ($iFlag = 0 Or $iFlag = 1 Or $iFlag = 2) Then Return SetError(3, 3, '')
Local $oFSO = ObjCreate("Scripting.FileSystemObject"), $sTFolder
$sTFolder = $oFSO.GetSpecialFolder (2)
Local $hOutFile = @TempDir & $oFSO.GetTempName
If Not StringInStr($sFilter, ';') Then $sFilter &= ';'
Local $aSplit = StringSplit(StringStripWS($sFilter, 8), ';'), $sRead, $sHoldSplit
For $iCC = 1 To $aSplit[0]
If StringStripWS($aSplit[$iCC],
= '' Then ContinueLoop
If StringLeft($aSplit[$iCC], 1) = '.' And UBound(StringSplit($aSplit[$iCC], '.')) - 2 = 1 Then $aSplit[$iCC] = '*' & $aSplit[$iCC]
$sHoldSplit &= '"' & $sPath & $aSplit[$iCC] & '" '
Next
$sHoldSplit = StringTrimRight($sHoldSplit, 1)
If $iRecurse Then
RunWait(@ComSpec & ' /c dir /b /s /a ' & $sHoldSplit & ' > "' & $hOutFile & '"', '', @SW_HIDE)
Else
RunWait(@ComSpec & ' /c dir /b /a ' & $sHoldSplit & ' /o-e /od > "' & $hOutFile & '"', '', @SW_HIDE)
EndIf
$sRead &= FileRead($hOutFile)
If Not FileExists($hOutFile) Then Return SetError(4, 4, '')
FileDelete($hOutFile)
If StringStripWS($sRead,
= '' Then SetError(4, 4, '')
Local $aFSplit = StringSplit(StringTrimRight(StringStripCR($sRead), 1), @LF)
Local $sHold
For $iCC = 1 To $aFSplit[0]
If $sExclude And StringLeft($aFSplit[$iCC], _
StringLen(StringReplace($sExclude, '*', ''))) = StringReplace($sExclude, '*', '') Then ContinueLoop
Switch $iFlag
Case 0
If StringLeft($aFSplit[$iCC], StringLen($sPath)) <> $sPath Then
$sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
Else
$sHold &= $aFSplit[$iCC] & Chr(1)
EndIf
Case 1
If StringInStr(FileGetAttrib($sPath & '\' & $aFSplit[$iCC]), 'd') Then ContinueLoop
If StringLeft($aFSplit[$iCC], StringLen($sPath)) <> $sPath Then
$sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
Else
$sHold &= $aFSplit[$iCC] & Chr(1)
EndIf
Case 2
If Not StringInStr(FileGetAttrib($sPath & '\' & $aFSplit[$iCC]), 'd') Then ContinueLoop
If StringLeft($aFSplit[$iCC], StringLen($sPath)) <> $sPath Then
$sHold &= $sPath & $aFSplit[$iCC] & Chr(1)
Else
$sHold &= $aFSplit[$iCC] & Chr(1)
EndIf
EndSwitch
Next
If StringTrimRight($sHold, 1) Then Return StringSplit(StringTrimRight($sHold, 1), Chr(1))
Return SetError(4, 4, '')
EndFunc ;==>_FileListToArrayEx
Ich denke das Includes fehlt, aber ich habe das "OrganizeIncludes" verwendet und danach benötige ich keine Includes.
Wenn aber keine nötig sind, frage ich mich, woran es liegen kann.
Meine Kommentare hinter den Zeilen im Quelltext einfach ignorieren. Irgendwie muß man sich ja alles merken und das möglichst kurz.
Danke an alle, dir mir geholfen habe soweit aber schon zu kommen.
LG, L I N A.
@ FirePanther
Ja, es liegt evtl. an der Version, denn ich habe die älteren Version noch alle und mit der von Oktober ist das kein Problem.
Aber Du solltest dennoch es auf die neue Version umstellen, da es ein Lerneffekt. ![]()
Auf Deiner Seite etwas downloaden? Alleine bereits "hacker" im der Domain, rät mir davon persönlich ab. Dazu noch eine Subdomain, wo das Impressum nicht klar ersichtlich ist (rechtlich nicht zulässig).
Gerne sende ich Dir mal Info's zu, die rechtliches zur Internetpräsentation beschreiben, aber da würde ich mir die Finger wund schreiben, wenn ich das abschreibe. Aber eine Kurzform kann ich Dir mal via PM senden. Ist nicht böse gemeint, nur Du solltest da sehr vorsichtig sein.
Also, da würde ich etwas mehr wert auf die Seite legen, wenn Du Links veröfentlichst.
So, nun mal einen sonnigen Sonntag und ab heute sind wieder "Konfer-Abschluß-Partys" odeer wie immer das bei Euch genannt wird.
Gruß, Lina.