Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / OpenFileDialog / 7 сообщений из 7, страница 1 из 1
09.08.2007, 19:46
    #34718331
час58
час58
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
помогите разобраться...

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:51
    #34718342
asmod64
asmod64
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
час58
Код: plaintext
'fdlg.Filterlndex * 2 ' а это зачем?

А код та чей?

тэг SRC для кого сделан?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.08.2007, 19:54
    #34718348
asmod64
asmod64
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
Да и код исключительно по windows.forms зачем его в ADO.Net спрашиваете?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.08.2007, 19:56
    #34718351
час58
час58
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
код из обучалки
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
09.08.2007, 20:03
    #34718354
час58
час58
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
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
| Ответить | Цитировать | Написать  
10.08.2007, 11:54
    #34719349
asmod64
asmod64
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
Код: 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, 12:06
    #34719405
час58
час58
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
OpenFileDialog
огромное спасибо.
Значит создаём объект и с ним работаем...:)
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / ADO.NET, LINQ, Entity Framework, NHibernate, DAL, ORM [игнор отключен] [закрыт для гостей] / OpenFileDialog / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 388ms
Закрыть
start [/forum/topic.php?fid=17&tablet=1&tid=1352665]:
 0ms
get settings:
 10ms
get forum list:
 20ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 31ms
get topic data:
 11ms
get forum data:
 4ms
get page messages:
 54ms
get tp. blocked users:
 1ms
others: 251ms
total:  388ms
x
x
Закрыть


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