ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как такое сделать?
13 сообщений из 38, страница 2 из 2
  2  все
Как такое сделать?
    #36549417
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MetalFanПлз, поскажите почему не получается сохранить файл

Потому что у вас нет, собственно, вывода в файл, сразу после открытия в файл идет его закрытие. Вывод в файл - команда Print.

И получение дескриптора вы зря закомментировали.
...
Рейтинг: 0 / 0
30.03.2010, 00:14
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549473
MetalFan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MetalFan
Гость
Private Sub Command4_Click()
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
'F = FreeFile
'On Error GoTo Cansel
CommonDialog1.CancelError = True
CommonDialog1.Filter = "Òåêñòîâûå ôàéëû (*.txt)|*.txt"
CommonDialog1.Flags = cdlOFNOverwritePrompt
CommonDialog1.DialogTitle = "Ñîõðàíèòü òåêñòîâîé ôàéë êàê..."
CommonDialog1.ShowSave
Open CommonDialog1.FileName For Output As #F
Print #F, Text1.Text
Close #F
Exit Sub
'Cansel1:
'If Err.Number = cdlCancel Then
'Exit Sub
'Else
'MsgBox Err.Description
'End If
'End Sub

Я и так писал, ошибка
Run time error 52
Становится на строку
Open CommonDialog1.FileName For Output As #F
...
Рейтинг: 0 / 0
30.03.2010, 00:54
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549480
MetalFan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MetalFan
Гость
Тут есть вообще кнопка редактировать? Или я слеп?
Print #F, Text1.Text
Print #F - это вывод номера или уже присвоеного ему текста?
...
Рейтинг: 0 / 0
30.03.2010, 01:00
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549482
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MetalFanRun time error 52

Очень информативно.
Текст ошибки дайте.
...
Рейтинг: 0 / 0
30.03.2010, 01:04
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549484
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MetalFanТут есть вообще кнопка редактировать? Или я слеп?

Вопрос неясен

MetalFanPrint #F, Text1.Text

Это правильно, ошибка у вас в другой строке возникает
...
Рейтинг: 0 / 0
30.03.2010, 01:06
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549493
MetalFan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MetalFan
Гость
Я нашел ошибку, нужно было разбиндить
F = FreeFile
Хотя не могу понять зачем? зачем нам присваивать Ф новій номер, если нам его просто нужно вівести?


Print #F, Text1.Text
Можно подробнее что делает Print #F: выводит номер или сам текст, который ему присвоен?

Редактировать на форуме(кнопка хД)
...
Рейтинг: 0 / 0
30.03.2010, 01:16
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549502
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MetalFanЯ нашел ошибку, нужно было разбиндить
F = FreeFile
Хотя не могу понять зачем? зачем нам присваивать Ф новій номер, если нам его просто нужно вівести?

Читайте топик с начала. F - это дескриптор файла, через него ОС будет общаться с файловой системой.

MetalFanPrint #F, Text1.Text
Можно подробнее что делает Print #F: выводит номер или сам текст, который ему присвоен?

Print #F, Text1.Text - отправляет содержимое текстбокса Text1 в файл #F

MetalFanРедактировать на форуме(кнопка хД)

Кнопка "Редактировать"
...
Рейтинг: 0 / 0
30.03.2010, 01:21
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549506
MetalFan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MetalFan
Гость
Да я вро ди бы понял что такое Ф. Но мы его уже присвоили какому-то числу. Теперь нам нужно его просто вывести, нам не нужно его присваивать новому номеру. Не понимаю. Топик я много раз перечитывал
...
Рейтинг: 0 / 0
30.03.2010, 01:25
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549512
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MetalFanДа я вро ди бы понял что такое Ф. Но мы его уже присвоили какому-то числу. Теперь нам нужно его просто вывести, нам не нужно его присваивать новому номеру. Не понимаю. Топик я много раз перечитывал

После закрытия файла дескриптор освобождается.
Кроме того, в вашем коде тут переменной F НИЧЕГО не присвоено, она равна Empty, когда вы пытаетесь использовать ее в команде Open
...
Рейтинг: 0 / 0
30.03.2010, 01:31
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549515
MetalFan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MetalFan
Гость
Shocker.Pro
После закрытия файла дескриптор освобождается.
Кроме того, в вашем коде тут переменной F НИЧЕГО не присвоено, она равна Empty, когда вы пытаетесь использовать ее в команде Open
\'Close #F, я его не освобождал. Он забинден.
...
Рейтинг: 0 / 0
30.03.2010, 01:45
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549526
MetalFan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
MetalFan
Гость
Я так понимаю для вывода нужен новый дескриптор?
...
Рейтинг: 0 / 0
30.03.2010, 02:00
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549694
Djon Player
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Djon Player
Участник
MetalFanЯ так понимаю для вывода нужен новый дескриптор?Для вывода в файл, файл должен быть открыт в режиме позволяющем вести запись в файл.
Если вы открыли файл в режиме на запись, то новый дескриптор открывать не нужно, а надо использовать тот, с помощью которого вы его открыли.
...
Рейтинг: 0 / 0
30.03.2010, 09:24
| Ответить | Цитировать | Написать  
Как такое сделать?
    #36549746
Фотография Shocker.Pro
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Shocker.Pro
Участник
MetalFanShocker.Pro
После закрытия файла дескриптор освобождается.
Кроме того, в вашем коде тут переменной F НИЧЕГО не присвоено, она равна Empty, когда вы пытаетесь использовать ее в команде Open
\'Close #F, я его не освобождал. Он забинден.

в вашем коде тут переменная F не определена. Используйте Option Explicit , чтобы это стало понятно
...
Рейтинг: 0 / 0
30.03.2010, 09:48
| Ответить | Цитировать | Написать  
13 сообщений из 38, страница 2 из 2
  2  все
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Как такое сделать?
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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