Чтение и запись значений из/в ini-файл

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

Чтение и запись значений из/в ini-файл

Сообщение td » 08.04.2003 (Вт) 20:30

Как подключить ини-файл и прочитать из него информацию?
Есть ли в ВБ специальные функции или можно только как с текстовым файлом?

Damage
Обычный пользователь
Обычный пользователь
 
Сообщения: 50
Зарегистрирован: 06.04.2003 (Вс) 18:31
Откуда: Москва

Сообщение Damage » 08.04.2003 (Вт) 20:34

Вот готовый пример:
[url]URL http://vbs.r2.ru/Sources/Wwfiles/ini.zip[/url]

FaKk2
El rebelde gurú
El rebelde gurú
Аватара пользователя
 
Сообщения: 2031
Зарегистрирован: 09.03.2003 (Вс) 22:10
Откуда: Los Angeles

Сообщение FaKk2 » 08.04.2003 (Вт) 22:32

используй АПИ ф-ции. там есть все что надо
Для получения ответа надо продемонстрировать качества, позволяющие стать компетентным — внимательность, вдумчивость, наблюдательность, желание активно участвовать в выработке решения.

RayShade
Scarmarked
Scarmarked
Аватара пользователя
 
Сообщения: 5511
Зарегистрирован: 02.12.2002 (Пн) 17:11
Откуда: Russia, Saint-Petersburg

Сообщение RayShade » 09.04.2003 (Ср) 10:05

Имелись в виду:



Private Declare Function GetPrivateProfileInt Lib "kernel32" Alias "GetPrivateProfileIntA" (ByVal lpApplicationName As String, ByVal lpKeyName As String, ByVal nDefault As Long, ByVal lpFileName As String) As Long

Private Declare Function GetPrivateProfileSection Lib "kernel32" Alias "GetPrivateProfileSectionA" (ByVal lpAppName As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long

Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long

FaKk2
El rebelde gurú
El rebelde gurú
Аватара пользователя
 
Сообщения: 2031
Зарегистрирован: 09.03.2003 (Вс) 22:10
Откуда: Los Angeles

Сообщение FaKk2 » 09.04.2003 (Ср) 10:20

Если уж на то пошло, то надо ещё и объяснить как ими пользоваться.... :)
Для получения ответа надо продемонстрировать качества, позволяющие стать компетентным — внимательность, вдумчивость, наблюдательность, желание активно участвовать в выработке решения.

Tarik
Агент Системы
Агент Системы
Аватара пользователя
 
Сообщения: 1222
Зарегистрирован: 03.01.2003 (Пт) 16:05
Откуда: Москва

Сообщение Tarik » 09.04.2003 (Ср) 16:33

Если уж на то пошло, так надо Api-guide качать :)
Изображение

Ever tried? Ever failed? No matter. Try again! Fail again! Fail better!

v-adix
Постоялец
Постоялец
 
Сообщения: 490
Зарегистрирован: 14.11.2002 (Чт) 15:11

Сообщение v-adix » 17.04.2003 (Чт) 11:49

если уж на то пошло, то вот вам модуль
как использовать:
writeinistring "раздел", "ключ" , "значение", "ини файл"
getinistring "раздел", "ключ", "ини файл"
Вложения
Modules.zip
(1.65 Кб) Скачиваний: 139

goro
Постоялец
Постоялец
 
Сообщения: 494
Зарегистрирован: 03.12.2002 (Вт) 11:45
Откуда: Украина, Запорожье

Сообщение goro » 17.04.2003 (Чт) 17:52

если уж уж на то пошло то вот вам еще кое-что...

использовать так:

in General Declaration
Dim clsini as new clsini

а потом просто ClsINI.[функция]
Вложения
clsINI.zip
Модуль для работы с ИНИ
(682 байт) Скачиваний: 130
ПРЕВЕД


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

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

Сейчас этот форум просматривают: Google-бот и гости: 84

    TopList