INIファイルにアクセスするコンポーネントをVisualBasic5.0で 作成してみました。
IIS3.0+ASP、WSHでの動作を確認しました。

INIファイルにアクセスするためのコンポーネントです。
VisualBasic5.0で開発しました。
関連するWIN32APIは、GetPrivateProfileInt,GetPrivateProfileString, WritePrivateProfileString です。
ソースをつけていますので、ご自由に利用していただければと思います。

ソースとDLL: source.lzh 12,288バイト
セットアップ: setup.lzh 1,493,650 バイト

Set objProfile = Server.CreateObject("aspProfile.Private")
intResult = objProfile.WriteString("Section1", "KeyA", "Value", "c:\temp\test.ini")


Set objProfile = Server.CreateObject("aspProfile.Private")

GetInt	キーから数字を取得する
GetString	キーから文字列を取得する
GetSections	セクションの一覧を取得する
GetKeys	キーの一覧を取得する
WriteString	キーに文字列を設定する
DeleteSection	セクションを削除する
DeleteKey	キーを削除する

GetInt

キーから数字を取得する

GetInt(strSection, strKey, intDefault, strFileName)

strSection	セクション名
strKey	キー名
intDefault	省略時の値
strFileName	ファイル名

戻り値: 正常終了 1、エラー 0

例: strResult = objProfile.GetInt("セクション", "キー", 0, "system.ini")

GetString

キーから文字列を取得する

GetString(strSection, strKey, strDefault, strFileName)

strSection	セクション名
strKey	キー名
strDefault	省略時の値
strFileName	ファイル名

戻り値: 正常終了 1、エラー 0

例: strResult = objProfile.GetString("セクション", "キー", "省略", "system.ini")

GetSections

セクションの一覧を取得する

GetSections(strFileName)

strFileName

ファイル名

戻り値: セクションのコレクション

例: Set colSections = objProfile.GetSections("system.ini")

GetKeys

キーの一覧を取得する

GetKeys(strSection, strFileName)

strSection	セクション名
strFileName	ファイル名

戻り値: キーのコレクション

例: Set colKeys = objProfile.GetKeys("セクション", "system.ini")

WriteString

キーに文字列を設定する

WriteString(strSection, strKey, strString, strFileName)

strSection	セクション名
strKey	キー名
strString	値
strFileName	ファイル名

戻り値: 正常終了 1、エラー 0

例: strResult = objProfile.WriteString("セクション", "キー", "値", "system.ini")

DeleteSection

セクションを削除する

DeleteSection(strSection, strFileName)

strSection	セクション名
strFileName	ファイル名

戻り値: 正常終了 1、エラー 0

例: strResult = objProfile.DeleteSection("セクション", "system.ini")

DeleteKey

キーを削除する

DeleteSection(strSection, strKey, strFileName)

strSection	セクション名
strKey	キー名
strFileName	ファイル名

戻り値: 正常終了 1、エラー 0

例: strResult = objProfile.DeleteKey("セクション", "キー", "system.ini")

読み込みバッファのサイズは、10Kバイトです。

ファイル名は、フルパスで指定しない場合は、Windowsディレクトリからの 相対パスになる。