[ niknen @ 24.03.2006. 08:47 ] @
| Kako mogu da u accessu na novoj formi napravim formicu koja ce da sadrzi dva dugmeta jedni za ubacivanje slike a drugo za brisanje te slike i kada pritisnem dugme ubaci da mi ubaci sliku iz nekog direktorijum po mogucstvu ako moze da me pita koji direktorijum zelim da otvorim?! I da se ta slika ubaci u neki prozorcic za image?!!!
pomagajte hvala Vam unapred
|
[ Trtko @ 27.03.2006. 11:05 ] @
Dim fd As FileDialog
Set fd = Application.FileDialog(msoFileDialogFilePicker)
Dim vrtSelectedItem As Variant
With fd
.Filters.Clear
.Filters.Add "All files", "*.*"
.Filters.Add "Images", "*.gif; *.jpg; *.jpeg", 1
If .Show = -1 Then
For Each vrtSelectedItem In .SelectedItems
slika.Picture = vrtSelectedItem
Label59.Caption = vrtSelectedItem
Next vrtSelectedItem
Else
End If
End With
Set fd = Nothing
Eto tak.
a imas i drugi nacin s activex controlom commodialogom
Dim izb As String
izborsli.FileName = ""
izb = ""
izborsli.ShowOpen
izb = izborsli.FileName
If IsNull(izb) Or izb = "" Then
Else
slika.Picture = izb
Label59.Caption = izb
End If
Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.