THT DUYURU

THT Yardım Merkezi THT Yardım Merkezi bölümünden; teknoloji ve bilişim ile ilgili her konu için yardım isteyebilirsiniz.

siber güvenlik eğitimi
Seçenekler

Visual basic 10 yardim

turanvrl - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
07/2013
Nereden:
Antalya
Yaş:
25
Mesajlar:
208
Konular:
75
Teşekkür (Etti):
27
Teşekkür (Aldı):
9
Ticaret:
(0) %
6
279
18-08-2013 15:21
#1
Oncelikle hayirli forumlar
Visual basic10 da load kismina cmd ile dosya acmam lazim nasil acabilirim yada baska bi turlu?
--------------------- TurkHackTeam
ahmetbslk - ait Kullanıcı Resmi (Avatar)
Uzman Üye
Üyelik tarihi:
07/2013
Nereden:
Sakarya
Mesajlar:
1.233
Konular:
89
Teşekkür (Etti):
18
Teşekkür (Aldı):
254
Ticaret:
(0) %
18-08-2013 15:36
#2
Bat dosyası oluştur programın bulunduğu yere kaydet
Load kısmına Shell(x.bat)

olması gerekiyor tam bilmiyorum ama bakıcam dostum senin için
turanvrl Teşekkür etti.
WhisPer* - ait Kullanıcı Resmi (Avatar)
Uzman Üye
Üyelik tarihi:
04/2013
Nereden:
Balıkesir
Yaş:
23
Mesajlar:
1.881
Konular:
339
Teşekkür (Etti):
160
Teşekkür (Aldı):
424
Ticaret:
(0) %
18-08-2013 15:40
#3
buyur

Kod:
Dim oShell
Set oShell = WScript.CreateObject ("WScript.Shell")
oShell.run "cmd /edit C:\dosyayolu.txt"
Set oShell = Nothing
umarım seni doğru anlamışımdır
turanvrl Teşekkür etti.
ahmetbslk - ait Kullanıcı Resmi (Avatar)
Uzman Üye
Üyelik tarihi:
07/2013
Nereden:
Sakarya
Mesajlar:
1.233
Konular:
89
Teşekkür (Etti):
18
Teşekkür (Aldı):
254
Ticaret:
(0) %
18-08-2013 15:59
#4
Alıntı:
WhisPer*´isimli üyeden Alıntı Mesajı göster
buyur

Kod:
Dim oShell
Set oShell = WScript.CreateObject ("WScript.Shell")
oShell.run "cmd /edit C:\dosyayolu.txt"
Set oShell = Nothing
umarım seni doğru anlamışımdır
teşekkürler dostum banada lazımdı
turanvrl - ait Kullanıcı Resmi (Avatar)
Üye
Üyelik tarihi:
07/2013
Nereden:
Antalya
Yaş:
25
Mesajlar:
208
Konular:
75
Teşekkür (Etti):
27
Teşekkür (Aldı):
9
Ticaret:
(0) %
18-08-2013 16:19
#5
Çözüldü
Alıntı:
Private Function ac(dosya as string)
Shell("cmd /c " & Chr(34) & dosya & Chr(34), vbHide)
End Function

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ac("C:\Fraps\fraps.exe")
End Sub
--------------------- TurkHackTeam
Dark-Man - ait Kullanıcı Resmi (Avatar)
E-Mail onayı yapılmamış üye
Üyelik tarihi:
01/2013
Nereden:
I Don't Know
Mesajlar:
4.427
Konular:
1812
Teşekkür (Etti):
295
Teşekkür (Aldı):
1391
Ticaret:
(0) %
18-08-2013 16:34
#6
Shell /dosyayolu İle Çok Kısa Şekildede Yapabilirsiniz.

-Shell("C:/Klasor İsmi/Calıstır.cmd")
'iMuh@fiz - ait Kullanıcı Resmi (Avatar)
Özel Üye
Üyelik tarihi:
08/2012
Nereden:
Bakü
Yaş:
27
Mesajlar:
11.074
Konular:
4080
Teşekkür (Etti):
1114
Teşekkür (Aldı):
1193
Ticaret:
(0) %
18-08-2013 17:03
#7
istek uzerine kilit
--------------------- Kimler geldi kimler gecti don bak arkana elbet ki zaman bizi sizide silip supurecektir peki bizden geriye ne kalicak ? keske hic bir sey kalmasa...

Youtube kanalim ► https://goo.gl/eM6wz2

Bookmarks


« Önceki Konu | Sonraki Konu »
Seçenekler