Сохранение текста в файл

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Tresher
Начинающий
Начинающий
 
Сообщения: 1
Зарегистрирован: 23.12.2005 (Пт) 19:12
Откуда: Николаев, Украина

Сохранение текста в файл

Сообщение Tresher » 07.01.2006 (Сб) 19:28

Срочно нужна помощь!
Я сейчас далеко от хелпа и книг, а срочно надо написать программку, чтоб она сохраняла в файл. Вроде пишу всё правильно а чето не работает.
:!: :?: :idea: Помогите.
Бог тебе не нянька. Он дал тебе разум, чтоб ты не пропал. А дальше крутись сам.

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 07.01.2006 (Сб) 19:30

open "C:\123.txt" for append as #1
print #1, "a new line"
close #1

GSerg
Шаман
Шаман
 
Сообщения: 14286
Зарегистрирован: 14.12.2002 (Сб) 5:25
Откуда: Магадан

Сообщение GSerg » 07.01.2006 (Сб) 19:30

Ну для начала будет неплохо увидеть то, что не работает - для дальнейшего анализа и во избежание возникновения подозрений в отсутствии такового...
Как только вы переберёте все варианты решения и не найдёте нужного, тут же обнаружится решение, простое и очевидное для всех, кроме вас

mdx
Продвинутый пользователь
Продвинутый пользователь
Аватара пользователя
 
Сообщения: 169
Зарегистрирован: 06.01.2006 (Пт) 18:13
Откуда: I'm from Russia!

Сообщение mdx » 07.01.2006 (Сб) 19:51

Amed писал(а):open "C:\123.txt" for append as #1
print #1, "a new line"
close #1

Ну, предположим, если C:\123.txt не существует, то получится ошибка, надо сначала проверить, существует ли файл, и если нет, то открыть его для Output'a.

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 07.01.2006 (Сб) 20:23

mdx писал(а):Ну, предположим, если C:\123.txt не существует, то получится ошибка, надо сначала проверить, существует ли файл, и если нет, то открыть его для Output'a.


Check it yourself before posting...

Vinechka
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 381
Зарегистрирован: 10.05.2005 (Вт) 4:07
Откуда: Москва

Сообщение Vinechka » 07.01.2006 (Сб) 20:24

Не будет ошибки. Новый создаст, как при Output, так и при Append.

ЗЫ: опередили пока писал :(

Drag
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 85
Зарегистрирован: 29.01.2005 (Сб) 23:54
Откуда: Москва

Сообщение Drag » 18.01.2006 (Ср) 17:46

Amed писал(а):open "C:\123.txt" for append as #1
print #1, "a new line"
close #1

Была у меня эта проблема. Если в качестве "a new line" поставить "Привет, ты кто?", то при чтении он будет считать, что это не одна запись, а две.

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 18.01.2006 (Ср) 17:53

Значит, запятая считается за разделитель.
Как читаешь?

Drag
Обычный пользователь
Обычный пользователь
Аватара пользователя
 
Сообщения: 85
Зарегистрирован: 29.01.2005 (Сб) 23:54
Откуда: Москва

Сообщение Drag » 18.01.2006 (Ср) 18:32

Ну, это само собой разумеется. А можно как нибудь записывать запятую в файл, чтобы она не была разделителем. Если просто все считывать и подставлять в конце каждой записи запятую, то абзацы тоже будут считаться запятыми. Единственное, что я придумал - это заменить запятую другим знаком. Но Блокнот ведь как-то открывает файлы с запятыми....

alibek
Большой Человек
Большой Человек
 
Сообщения: 14205
Зарегистрирован: 19.04.2002 (Пт) 11:40
Откуда: Russia

Сообщение alibek » 18.01.2006 (Ср) 18:37

Каким разделителем? Запятая -- это запятая. Ни больше, ни меньше.
Lasciate ogni speranza, voi ch'entrate.

Odrick
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 503
Зарегистрирован: 28.09.2003 (Вс) 2:04

Сообщение Odrick » 18.01.2006 (Ср) 18:51

Тьфу. Читай через Line Input и пофигу будет тебе запятая.
То, что для одних константа, для других только переменная...

Amed
Алфизик
Алфизик
 
Сообщения: 5346
Зарегистрирован: 09.03.2003 (Вс) 9:26

Сообщение Amed » 18.01.2006 (Ср) 18:56

Drag писал(а):Была у меня эта проблема. Если в качестве "a new line" поставить "Привет, ты кто?", то при чтении он будет считать, что это не одна запись, а две.


Если у человека при чтении "Привет, ты кто?" разбивается на две записи, то у него запятая - разделитель. Какие еще варианты?

Odrick
Постоялец
Постоялец
Аватара пользователя
 
Сообщения: 503
Зарегистрирован: 28.09.2003 (Вс) 2:04

Сообщение Odrick » 18.01.2006 (Ср) 19:10

Второй вариант:

Код: Выделить всё

Open "MyFile.txt" For Binary As #1
sMyStr = Space(LOF(1))
Get #1, , sMyStr
Close #1


получиш весь текст в "исходном виде" :)
То, что для одних константа, для других только переменная...


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 191

    TopList