ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / OpenFileDialog
7 сообщений из 7, страница 1 из 1
OpenFileDialog
    #34718331
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
помогите разобраться...

Dim fdlg As New System.Windows.Forms.OpenFileDialog
fdlg = Me.OpenFileDialog1
fdlg.Title = "Открыть"
'fdlg. .InitialDirectory("c:\") ' не работает почему -то
fdlg.CheckFileExists = True
fdlg.DefaultExt = "mdb"

'fdlg.Filterlndex * 2 ' а это зачем?
fdlg.RestoreDirectory = True
If (fdlg.ShowDialog() = DialogResult.OK) Then
Try
Me.txtboxPathToAccess.Text = fdlg.FileName

Catch ex As Exception
MsgBox("Ошибка при загрузке файла")
End Try
End If
...
Рейтинг: 0 / 0
09.08.2007, 19:46
| Ответить | Цитировать | Написать  
OpenFileDialog
    #34718342
asmod64
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
asmod64
Участник
час58
Код: plaintext
'fdlg.Filterlndex * 2 ' а это зачем?

А код та чей?

тэг SRC для кого сделан?
...
Рейтинг: 0 / 0
09.08.2007, 19:51
| Ответить | Цитировать | Написать  
OpenFileDialog
    #34718348
asmod64
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
asmod64
Участник
Да и код исключительно по windows.forms зачем его в ADO.Net спрашиваете?
...
Рейтинг: 0 / 0
09.08.2007, 19:54
| Ответить | Цитировать | Написать  
OpenFileDialog
    #34718351
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
код из обучалки
...
Рейтинг: 0 / 0
09.08.2007, 19:56
| Ответить | Цитировать | Написать  
OpenFileDialog
    #34718354
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
asmod64Да и код исключительно по windows.forms зачем его в ADO.Net спрашиваете?

вот вырезка...
Visual Basic .NET: разработка приложений

Protected Sub itmOpen__Click(ByVal sender As System.Object,
ByVal e As System.EventArgs)
Dim fdlg As New System.Windows.Forms.OpenFileDialog()
fdig.Title = "Открыть"
fdlg.InitialDirectory - "c:\"
fdlg.CheckFileExists = True
fdlg.DefaultExt = "gif"
fdlg.AddExtension ™ True
fdlg.Filter - "All files (*.+)|*.*|A11 files (*.*)!*.*"
fdlg.Filterlndex * 2
fdlg.RestoreDirectory = True
If (fdlg.ShowDialog() = DialogResult.OK) Then
Try
PictureBoxl.Image = Image.FromFile(fdlg.FileName)
Catch ex As Exception
KessageBox.Show("Ошибка при загрузке файла")
End Try
End If
End Sub
Выбор нескольких файлов
...
Рейтинг: 0 / 0
09.08.2007, 20:03
| Ответить | Цитировать | Написать  
OpenFileDialog
    #34719349
asmod64
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
asmod64
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
        Dim oOpenFileDialog As New System.Windows.Forms.OpenFileDialog
        oOpenFileDialog.Title = "Открыть"
        oOpenFileDialog.InitialDirectory = "C:\"
        oOpenFileDialog.CheckFileExists = True
        oOpenFileDialog.DefaultExt = "gif"
        oOpenFileDialog.AddExtension = True
        oOpenFileDialog.Filter = "Gif files (*.gif)|*.gif|All files (*.*)|*.*"
        oOpenFileDialog.FilterIndex =  2 
        oOpenFileDialog.RestoreDirectory = True
        If (oOpenFileDialog.ShowDialog() = Windows.Forms.DialogResult.OK) Then
            Try
                PictureBox1.Image = Image.FromFile(oOpenFileDialog.FileName)
            Catch ex As Exception
                MessageBox.Show("Ошибка при загрузке файла")
            End Try
        End If
...
Рейтинг: 0 / 0
10.08.2007, 11:54
| Ответить | Цитировать | Написать  
OpenFileDialog
    #34719405
Фотография час58
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
час58
Участник
огромное спасибо.
Значит создаём объект и с ним работаем...:)
...
Рейтинг: 0 / 0
10.08.2007, 12:06
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / OpenFileDialog
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=17&msg=34718351&tid=1352665]:
 0ms
get settings:
 7ms
get forum list:
 17ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 45ms
get topic data:
 9ms
get forum data:
 2ms
get page messages:
 49ms
get tp. blocked users:
 1ms
others: 205ms
total:  341ms
созд. / загр.: 341ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]