OpenFileDialog1 ile dosya adını bulma

Konu bilgisi

9cevap

3.095görüntüleme

05.2010açıldı

24.05.2010son cevap

#1
19.05.2010 21:08

VB .NET ile bir form oluşturalım ve içine
1 adet = PictureBox1
1 adet =Button1
2 adet =TextBox
1 adet = OpenFileDialog1

Ekleyelim istediğim şey Button1'e bastığımda seçtiğim resim PictureBox1'de görüntülensin amaaa TextBox1' de bu Resmin dosya adı, uzantısı ile yazılsın TextBox2'de ise Resmin dosya adı, uzantısız halde yazılsın bununla ilgili kaynak kodları yazabilirmisiniz

:tt1:

Cevaplar

mc92001

#2
20.05.2010 09:39


OpenFileDialog1.Title = "Bir Resim Seç"
        OpenFileDialog1.Filter = "JPEGS|*.jpg|GIFS|*.gif|Bitmaps|*.bmp"
        If OpenFileDialog1.ShowDialog = DialogResult.OK Then
            TextBox1.Text = OpenFileDialog1.FileName()
            OpenFileDialog1.AddExtension = True
            TextBox2.Text = IO.Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
            PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
            OpenFileDialog1.Reset()
        End If

Finix

Daha mükemmel bir Troy

#3
20.05.2010 13:24

Teşekkür ederim size :)

k2ann

#4
22.05.2010 16:46

eline sağlık ;) çok .net olmuş

Vatansever Konuyu açan

#5
23.05.2010 11:21

mc92001 dedi: ↑


OpenFileDialog1.Title = "Bir Resim Seç"
        OpenFileDialog1.Filter = "JPEGS|*.jpg|GIFS|*.gif|Bitmaps|*.bmp"
        If OpenFileDialog1.ShowDialog = DialogResult.OK Then
            TextBox1.Text = OpenFileDialog1.FileName()
            OpenFileDialog1.AddExtension = True
            TextBox2.Text = IO.Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
            PictureBox1.Image = Image.FromFile(OpenFileDialog1.FileName)
            OpenFileDialog1.Reset()
        End If

Teşekkür ederim ama textbox'lardan birinde dosya adı, uzantısıyla görünmeli bunada ihtiyacım var yazdığın projede textbox'lardan birinde dosya adı uzanısız görünüyor diğerindeyse dosyanın konumu dosya adı ve uzantısı eklenmiş haliyle görüntüleniyor burdan konum bilgisi olmasa tamam olacak sadece dosya adı uzantısı ile görünsün.

k2ann

#6
23.05.2010 17:11

dostum anladığım kadarıyla resim.jpg şeklinde olmasını istiyorsun bunun için
TextBox2.Text = IO.Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
satırını

TextBox2.Text = IO.Path.GetFileName(OpenFileDialog1.FileName) şeklinde değiştirmen yeterli olacaktır;)

Vatansever Konuyu açan

#7
23.05.2010 20:18

k2ann dedi: ↑
dostum anladığım kadarıyla resim.jpg şeklinde olmasını istiyorsun bunun için
TextBox2.Text = IO.Path.GetFileNameWithoutExtension(OpenFileDialog1.FileName)
satırını

TextBox2.Text = IO.Path.GetFileName(OpenFileDialog1.FileName) şeklinde değiştirmen yeterli olacaktır;)

Teşekkür ederim dediğin gibi yaptım sonuç olumlu

Alkolsuz

#8
23.05.2010 20:43

Çok başarılı emeğine sağlık;)

k2ann

#9
23.05.2010 23:59

;) rica ederim dostum..ii çalışmalar

mc92001

#10
24.05.2010 09:55

Rica ederim. İyi çalışmalar.

Cevabını yaz

Cevap yazmak için giriş yap ya da üye ol. Eski forum kullanıcı adın ve parolanla girebilirsin.