mustafakara

özür diliyorum haklısınız autoit komutlarıyla sildiğimizde boş kalmıyor nedense aklımda öyle kalmış sanıyorum ben şununlakarıştırdım manuel olarak sildiğimizde boşluklar oluşuyordu veri eklediğimizde ise boşluklara değil en sona ekliyordu ben onunla karıştırdım kusura bakmayın lütfen herkese kolay gelsin

arkadaşlar merhabalar ini dosyasından veri sildiğimizde yerlerindeki satırlar boş kalıyor bu satırlarıda veriyle birlikte nasıl sileriz?

arkadaşlar herkese teşekkürler tatil nedeniyle konunun takipçisiolamadım o yüzden örneklere ancak şimdi bakıyorum ilk olarak SwithMail.exe programına baktım ancak uygulama düzgün başlayamadı iletisi aldım diğer verilen linklere bakacağım teşekkürler bilen bir arkadaş bu konuya örnek verirse memnun olurum herkese kolay gelsin

inceledim ancak pek birşey anlamadım pop3 e ilişkin bir örnek verebilirmisiniz mail göndermeyle alakalı teşekkürler

önerdiğiniz ayarların hepsini daha önce denedim malesef çalışmıyor autoit formlarınada baktım herşey aynı neden bilmiyorum ama olmuyor bu konuyu iyi bilen bir arkadaş mail alma ve mail gönderme hakkında bilgi berirse memnun olacağız

arkadaşlar ipport u 25 ten 587 yaptığımda sunucu gönderenin adresini redetti sunucunun yanıtı 530.5.0 start tls command gibi bir yanıt alıyorum port 25 te ise sunucuya bağlanamadı yanıtı alıyorum lütfen yardım sanıyorum tls yi eklemem gerekecek nasıl yaparım

malesef hotmail de bu dediğiniz yok durumumdan dolayı belki ben fark edemedim diye başka arkadaşa baktırdım ancak seçenekler içersinde sadece silmeye ilişkin böyle bir ayara rastladık arkadaşlar en azından yukarıdaki örnek üzerinden yardımcı olabilirmisiniz

sevgili reyiz söyleminize ilişkin herhangibir ayara rastlamadım malesef

sevgili reyiz az önce inceledim gerekli ayarları yaptım ancak yinede gönderemedim şimdi hesabıma girip diğer ayarlara bakacağım teşekkürler kolay gelsin

işte arkadaşlar bu örnekle gmail üzerinden gönderebiliyorum ama hotmail de olmuyor yardımcı olursanız memnun olurum örnek: #Include<file.au3> $ToAddress = "[email protected]" ; destination address of the email - REQUIRED $FromName = "mustafa karabunar" $Subject = "önemli" $Body = "mail deneme" $AttachFiles = "c:\\boot.ini" ; the file you want to attach- leave blank if not needed $Importance = "high" ; Send message priority: "High", "Normal", "Low" Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") _BL_SEND_GMAIL($ToAddress,$FromName,$Subject,$Body,$AttachFiles,$Importance) Func _BL_SEND_GMAIL($ToAddress,$FromName = "",$Subject = "",$Body = "",$AttachFiles = "",$Importance = "Normal") Local $SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED Local $Username = "benim adresim" Local $Password = "benim şifrem" ;~ Local $IPPort = 25 ; port used for sending the mail ;~ Local $ssl = 0 ; enables/disables secure socket layer sending - put to 1 if using httpS ;~ Local $CcAddress = "[email protected]" ; address for cc - leave blank if not needed ;~ Local $BccAddress = "[email protected]" ; address for bcc - leave blank if not needed Local $CcAddress = "" ; address for cc - leave blank if not needed Local $BccAddress = "" ; address for bcc - leave blank if not needed Local $IPPort=465 ; GMAIL port used for sending the mail Local $ssl=1 ; GMAILenables/disables secure socket layer sending - put to 1 if using https Local $FromAddress = $Username & "@gmail.com" Local $rc = _INetSmtpMailCom($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $Body, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl) If @error Then MsgBox(0, "Mesaj gönderilirken hta oluştu", "Error code:" & @error & " Description:" & $rc) EndIf EndFunc ; 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, 8) $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

sevgili arkadaşlar ben yaptığım bir programa mail gönderme bölümü eklemek istiyorum mail göndermeyle alakalı kodlar elimde var ancak nedense gmail üzerinden gönderiyor ancak hotmail üzerinden göndermiyor her ikisindende gönderebileceğim bir kod yazabilirmisiniz bana teşekkürler

sevgili asmazh kolay gelsin bizim input yada combo lara yazdığımız yazılar soldan başlayarak yazdıklarımızı listede tutup diğerlerini listeden eliyor benim söylemek istediğim ise ilk etapta soldan başlayarak yazdıklarımı içerenleri bulduktan sonra daha sonrada boşluktan sonra yazdıklarımı içerenleri eklemesini istiyorum kara yazdığımda ilk etapta karayla başlayanları daha sonrada misal mustafa karayı eklemesi gibi yinede teşekkürler kolay gelsin

sevgili asmazh öncelikle teşekkür ederim tatil nedeniyle bakamamıştım ancak şimdi bakabildim kususuruma bakma lütfen ben bir telefon rehberi programı yapıyorum hatta daha önce yaptım onun birazdaha farklısını yapmaya çalışıyorum daha öncekinde isim arama bölümünü combobox u AutoComplete olarak yaptım ancak bunda benim yazdıklarıma yakın olanları tamamlıyordu ben şunu istiyorum hatta bu yanlızca combobox ta oluyorsa daha iyi afyonkarahisar bazında düşünürsek bana bir devlet hastahanesi lazım ben devlethastahanesi yazdığımda "emirdağ devlet hastahanesi" "dinar devlet hastahanesi" merkezi yanlızca devlet hastahanesi olarak kaydetmişim onuda devlet hastanesi olarak listelemesini istiyorum yanidevlet hastanesi yazdığımda bulunan liste şu şekilde olmalı "devlet hastahanesi" "emirdağ devlet hastanesi" "dinar devlet hastahanesi" yukarıda google.com daki gibi birşey olabilir demiştim bunun sebebi ben görme engelli olduğum için orada yazdığımda yazdığıma yakın olanlar liste halinde çıkıyor ben ok tuşlarıyla dolaşabiliyorum şimdi sizin yaptığınız ve benim verdiğim örnekte yazdığımı bitirdikten sonra tab tuşuna basarak listeye ulaşıyorum dahasonra ok tuşlarıyla dolaşıyorum umarım anlatabilmişimdir

sevgili arkadaşlar comboboxta yazılanı listelemesini istiyorum bunun için ne yapmalıyım daha önce bir arkadaşın yaptığı örnek vardı ancak bu yanlızca kelime başından itibaren listeliyor benim istediğim sadece kelime başından itibaren değil boşluktan sonra yazdıklarımı içerenleride listelemesini istiyorum örneğin liste içersinde şu isimler var "mustafa kara" "hamit kara" "kara yolları" "murat ak" ben "kara" yazdığımda kara yolları mustafa kara hamit kara gibi isimleri listelemesini istiyorum. bunu yanlızca combo içersine yapabilirsek daha iyi olur çünkü ben ismi yazdıktan sonra birde tab tuşu ile listeye gitmem gerekiyor aynı google gibi birşey istiyorum tabi mümkünse şimdidem teşekkür ederim. arkadaşın yaptığı örnek: #include <GUIListBox.au3> #include <GuiConstantsEx.au3> Global $FILE_LIST = @ScriptDir & "\Config.ini" _Main() Func _Main() Local $hCombo,$mylist,$SET_DATA,$BL_Value,$BL_Value1 = "?" GUICreate("YAZILANI LİSTELE", 400, 296) $hCombo = GUICtrlCreateCombo("", 0, 3, 400, 24) $mylist = GUICtrlCreateList("", 0, 24, 400, 97) GUISetState() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case -3 Exit EndSwitch $BL_Value = GUICtrlRead($hCombo) If $BL_Value <> $BL_Value1 Then GUICtrlSetData($mylist,"") $var2 = IniReadSectionNames($FILE_LIST) For $I = 1 To $var2[0] If StringLeft($var2[$I],StringLen($BL_Value)) = $BL_Value Then GUICtrlSetData($mylist,$var2[$I]) Next $BL_Value1 = $BL_Value _GUICtrlListBox_SetCurSel($mylist, 0) EndIf WEnd GUIDelete() EndFunc ;==>_Main

sevgili asmazh söylediklerini anladım ayrıca örnek işime yaradı çok teşekkürler sanada kolay gelsin