请问用VB6.0的 GetPrivateProfileString 去读ini文件的时候,是调用一次就读一次文件,
还是在第一次调用的时候把ini文件的所有内容load到内存里面,从内存里面查询的?谢谢!

解决方案 »

  1.   

    一般是一次调用一个
    如system.ing
    [服务器]
    server=computername
    [数据库]
    data=yourdataname
    [用户名]
    userid=sa
    [密码]
    userpassword=yourpwd
    调用过程
    Dim server, data, user, pwd
    Dim DbName As String * 255 '数据库名
    Dim n As Integer
    inifilename = App.Path & "\" & "system.ini"
    n = GetPrivateProfileString("服务器", "server", "", DbName, Len(DbName), inifilename)
    server = Left(DbName, n)
    n = GetPrivateProfileString("数据库", "data", "", DbName, Len(DbName), inifilename)
    data = Left(DbName, n)
    n = GetPrivateProfileString("用户名", "user", "", DbName, Len(DbName), inifilename)
    user = Left(DbName, n)
    n = GetPrivateProfileString("密码", "pwd", "", DbName, Len(DbName), inifilename)
    pwd = Left(DbName, n)
      

  2.   

    多谢ynkmsuperboy(工作无烟) !