Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Убрать кавычки после записи в файл / 7 сообщений из 7, страница 1 из 1
03.07.2004, 07:38:55
    #32588084
Deminik
Deminik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
Создаю файл
Код: plaintext
1.
2.
3.
4.
5.
dim hFile as long, strText as String
hfile = freefile
strText = chr( 34 ) & "Лалала" & chr( 34 ) & ";" & chr( 34 ) & "Блаблабла" & chr( 34 )
Open strFileName for Output Access Write as hFile
write #hfile, strText
close hfile

Перед записью в файл, strText в дебаггере выглядет так:

Код: plaintext
"Лалала";"Блаблабла"

В файле:

Код: plaintext
"""Лалала"";""Блаблабла"""

Что не так ?.... Точка с запятой не помогает... По форуму пытался найти - не нашел...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2004, 07:40:00
    #32588085
Deminik
Deminik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
P.S. Надо именно как в дебаггере...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2004, 07:47:48
    #32588086
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
Код: plaintext
1.
2.
3.
4.
5.
6.
Dim hFile As Long, strText As String
hFile = FreeFile
strText = "Лалала" & ";" & "Блаблабла"
Open "d:\dom.txt" For Output Access Write As hFile
Write #hFile, strText
Close hFile
debug.print ---> фото
файл ---->"Лалала;Блаблабла"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2004, 07:52:36
    #32588087
Deminik
Deminik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
В файле надо получить:
Код: plaintext
1.
"Лалала";"Блаблабла"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2004, 08:07:32
    #32588089
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
DeminikВ файле надо получить:
Код: plaintext
1.
"Лалала";"Блаблабла"

Иннннннааааа!
Код: plaintext
1.
2.
3.
4.
5.
6.
Dim hFile As Long, strText As String
hFile = FreeFile
strText = Chr( 34 ) & "Лалала" & Chr( 34 ) & ";" & Chr( 34 ) & "Блаблабла" & Chr( 34 )
Open "d:\dom.txt" For Output Access Write As hFile
Print #hFile, strText
Close hFile
"Лалала";"Блаблабла"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2004, 08:08:58
    #32588090
Shuhard
Shuhard
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
+ типа не Write а Print
если не углядишь!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
03.07.2004, 08:11:19
    #32588091
Deminik
Deminik
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Убрать кавычки после записи в файл
Здоровья тебе, Shuhard !!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Убрать кавычки после записи в файл / 7 сообщений из 7, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 473ms
Закрыть
start [/forum/topic.php?fid=45&mobile=1&tid=1673443]:
 0ms
get settings:
 7ms
get forum list:
 10ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 188ms
get topic data:
 6ms
get forum data:
 2ms
get page messages:
 25ms
get tp. blocked users:
 1ms
others: 230ms
total:  473ms
x
x
Закрыть


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