Jump to content

Ip Öğren 1.1


morning

Recommended Posts

IP Öğren 1.1

Sadece IP'nizi öğrenmek istiyorsanız kullanabileceğiniz minik bir uygulama.

Program basitçe IP adresinizi bulur, bunu panoya kopyalar ve bir bilgi mesajıyla size IP'nizi gösterir.Bu mesaj 10 sn. içinde otomatik olarak kapanır.

Ekran Görüntüsü:

21183lg.jpg

Not : /S parametresi kullandığınız zaman diyalog çıkmaz,direk IP kopyalanır.

Sürüm Değişiklikleri:

1.1 :
- Kaplumbağa hızındaki IE bazlı çalışmadığı için çok daha hızlı IP alabilme.
- Ufak parametre alma değişiklikleri
1.01:
- /s parametresi eklendi. Böylece diyalog olmadan da IP panoya kopyalanıyor.[/CODE]

:D

[CODE]http://www.mediafire.com/file/5m3zdhnozdt/IP.exe[/CODE]

356 KB'tır.

talha_252'ye önerileri için teşekkürler.

[b]Kaynak Kodu:[/b]

[CODE]; IP Öğren 1.1 - Morning
; talha_252'nin katkılarıyla.
; Saatin yanındaki simgeyi gizle
#NoTrayIcon
; Internet Fonksiyonlarını entegre et
#include <Inet.au3>
; IP'yi al
$ip = _GetIP()
; Parametre varsa...
if Not $CmdLine[0] = 0 Then
; Parametre /S ise
if StringUpper($CmdLine[1]) = StringUpper("/s") Then
ClipPut($ip)
; /S değilse
Else
ClipPut($ip)
MsgBox(4096 + 64,"IP Adresiniz","IP Adresiniz:" & @CRLF & $ip & @CRLF & "Otomatik olarak Panoya Kopyalandı.",10)
EndIf
; Parametre yoksa...
Else
ClipPut($ip)
MsgBox(4096 + 64,"IP Adresiniz","IP Adresiniz:" & @CRLF & $ip & @CRLF & "Otomatik olarak Panoya Kopyalandı.",10)
EndIf[/CODE]

Link to comment
Share on other sites

morning sen de "AutoIt Software Developer" gibi bir şey oldun bu aralar ha biggrin.gif

Cmd Gizle'de dediğim gibi fena sardım AutoIt'e. Aklıma geldikçe bu tür küçük çalışmaları sunmaya devam edeceğim. Eğer çok olursa paket yapacağım.

Düzenleme : Program 1.01 sürümüne güncellendi.

- /s parametresi kullanırsanız diyalog göstermiyor. (Büyük /S kullanmayın)

Morning cim bir şey diyecem fakat yanlış anlama smile.gif Autoit te ip öğrenmenin çok daha kolay yolu var.. smile.gif

Valla hiç bakmadım :D Dedim ya IE fonksiyonlarını öğrenmeye çalışırken böyle bir şey aklıma geldi.

Bu da alternatif olsun.

sakın o get ip fonsiyonu local(yerel) ip adresini almasin smile.gif

Yok normal IP'yi alıyormuş.

Link to comment
Share on other sites

sakın o get ip fonsiyonu local(yerel) ip adresini almasin smile.gif

Normal IP alıyor..

Ayrıca command line ile ilgili küçüük bir öneride bulunayım..

if Not $CmdLine[0] = 0 Then
if StringUpper($CmdLine[1]) = StringUpper("/s") Then
;~ /s parametresi verilince ne yapıalcaksa
Else
;~ /s parametresi verilmeyince ne yapılcaksa..
EndIf
EndIf[/CODE]

Böyle daha kolay olur :D Ayrıca büyük küçük farketmez :)

Link to comment
Share on other sites

Talha önerilerin için teşekkürler.Ama o kod hata verecek :D 2 tane EndIf olması gerekiyor ya o yüzden.

Genelde birden fazla parametreli programlarda çalıştığım için Stringinarray fonksiyonunu kullandım.

Mesela /A /B /C parametreleri olduğu zaman /C /A /B şeklinde belirtirsek sorun çıkmıyor.

Ama bu programda tek bir parametre var. O yüzden sorun olmaz.

Uygulama tekrar güncellendi. Direk _GetIP() fonksiyonu kullanıldı. talha_252'ye teşekkürler.

Link to comment
Share on other sites

Talha önerilerin için teşekkürler.Ama o kod hata verecek :) 2 tane EndIf olması gerekiyor ya o yüzden.

Genelde birden fazla parametreli programlarda çalıştığım için Stringinarray fonksiyonunu kullandım.

Mesela /A /B /C parametreleri olduğu zaman /C /A /B şeklinde belirtirsek sorun çıkmıyor.

Ama bu programda tek bir parametre var. O yüzden sorun olmaz.

Uygulama tekrar güncellendi. Direk _GetIP() fonksiyonu kullanıldı. talha_252'ye teşekkürler.

Aceleye gelmiş pardon :D Ayrıca bunda ki birden fazla komut için ;

if Not $CmdLine[0] = 0 Then
for $i=1 to $CmdLine[0]
if $CmdLine[$i] = "artık neye eşitliyosan :)" then
;~ yapılacak iş
endif
Next
EndIf[/CODE]

Böylece eğer birden fazla command line varsa onları alabilirsin.. :) (Çaktırma bende Autoit'e sardım bu aralar.İyice geliştirdim kendimi :) Yoksa bilmezdim :) )

Link to comment
Share on other sites

Abi sen de başlasana AutoIt'e (: Muhteşem 3'lü yapalım :)

AutoIt hiç ilgimi çekmedi. Onda yapabileceğin herşeyi Csharptada yapıyosun :)

Ama yine de olabilir :)

O daha kodlamayı öğrenecek de ohoooo :) :)

Talha seni var ya :)

Hiç bilmiyoz sanki kodlama falan :D

Link to comment
Share on other sites

AutoIt hiç ilgimi çekmedi. Onda yapabileceğin herşeyi Csharptada yapıyosun smile.gif

Ama yine de olabilir smile.gif

AutoIt kullanmamın en büyük sebebi,AutoIt'in hiç bir ek programa ihtiyaç duymaması.

Ayrıca AutoIt öğrenmek daha kolay,her komutun örneği var, birçok örnek kod var forumlarında.

Bilmemkaç yüz sayfalık kitaplar okumadan, dersleri öğreneceğim diye saatler harcamadan da basit programlar yazılabileceğini öğretti bana.

Bence bir dene.

Link to comment
Share on other sites

ip öğrenme tamamda ip değiştirme mümkünmü acaba böyle ufak bir programla.Modemim açma kapama derdi son bulsak

Link to comment
Share on other sites

AutoIt kullanmamın en büyük sebebi,AutoIt'in hiç bir ek programa ihtiyaç duymaması.

Ayrıca AutoIt öğrenmek daha kolay,her komutun örneği var, birçok örnek kod var forumlarında.

Bilmemkaç yüz sayfalık kitaplar okumadan, dersleri öğreneceğim diye saatler harcamadan da basit programlar yazılabileceğini öğretti bana.

Bence bir dene.

:) Deneyelim bakalım.. Sırf şu talhaya inat.. :D

Neyse kaynak dosyaları var kendisinin zaten. Onları okumakla başlayalım..

Link to comment
Share on other sites

ip öğrenme tamamda ip değiştirme mümkünmü acaba böyle ufak bir programla.Modemim açma kapama derdi son bulsak

IP Değiştirmek mümkün değil gibi.

JDownloader deneyebilirsiniz.

Kendi içinde modem yeniden başlatma betikleri var.

:) Deneyelim bakalım.. Sırf şu talhaya inat.. :D

Neyse kaynak dosyaları var kendisinin zaten. Onları okumakla başlayalım..

Dene dene :)

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...