如何访问 *.ini 里的数据，请各位指点一二！

2003-05-30 04:17:39 93 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

C++读取INI文件内容存放Map中一看到标题估计会有人会说，为什么还要讲INI文件内容读出来存放到map中呢？这不是浪费空间，时间么。。。因为：C++在读取INI文件时，一般都是在需要时，再根据GetPrivateProfileString函数，读取需要的key对应的值，但是，往往在项目中，读取文件花费的时间比较多，且读取文件也是会存在读取错误的情况。综上考虑，将在开始的时候，从INI文件中读取所有信息，保存到阅读详情

我自己用VB做了一个小程序，用来发送命令的。*.ini里存储有命令类型和命令。每种命令类型都有若干条命令，怎样访问才能做到我发送的命令是我选中命令类型中的命令。
存储方式为：
命令类型一
命令一
命令二
命令类型二
命令一
命令二
命令类型三
命令一
命令二
请各位指点一二

...全文

路由 NAT（简介、静态NAT、动态NAT、NATServer、NAPT、Easy-ip、NAT地址映射表）为了有效节约公网IPv4地址，并提供一定的网络安全保障能力，NAT网络地址转换技术孕育而生。NAT（Network Address Translation）网络地址转换，主要将私有地址转换成公网地址。NAT优点能够缓解公网地址紧缺问题。解决IP地址空间冲突或重叠的问题。网络扩展性更高，本地控制也更容易。内网结构变得不可见，从而增加了安全性。NAT缺点因为地址映射的原因，当网络转换过多时会存在转发延迟的问题。端到端寻址变得困难，因为经过了NAT地址转换相当于换了张脸，想找人就难了。阅读详情

caoliyong

其他数据库 2,208 成员 9,519 内容

+ 关注 + 加入社区

切换为时间正序

caoliyong 2003-07-09

打赏
举报

我搞不太清楚这两个函数，能不能举个例子将详细一点

friendwei 2003-07-09

打赏
举报

你用什么开发的呀。我这是 vb 的
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
Private Declare Function WritePrivateProfileString Lib "kernel32" Alias "WritePrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpString As Any, ByVal lpFileName As String) As Long

Public Function read_ini(sINIfile As String, sSection As String, sKey As String, sDefault As String) As String
On Error GoTo err_msg
Dim sTemp As String * 256
Dim nLength As Integer

sTemp = Space$(256)
nLength = GetPrivateProfileString(sSection, sKey, sDefault, sTemp, _
256, sINIfile)
read_ini = Left$(sTemp, nLength)
Exit Function
err_msg:
MsgBox "Read system ini.file is wrong!", vbInformation + vbOKOnly, "system error!"
End Function

Public Sub write_ini(sINIfile As String, sSection As String, sKey As String, sValue As String)
On Error GoTo err_msg
Dim n As Integer
Dim sTemp As String
sTemp = sValue
For n = 1 To Len(sValue)
If Mid$(sValue, n, 1) = vbCr Or Mid$(sValue, n, 1) = vbLf Then _
Mid$(sValue, n) = ""
Next n
n = WritePrivateProfileString(sSection, sKey, sTemp, sINIfile)
Exit Sub
err_msg:
MsgBox "write system ini.file is wrong!", vbInformation + vbOKOnly, "system error!"
End Sub

will521 2003-07-08

打赏
举报

取值
ProFileString('c:\aa.ini','peld-1',up,'')
写值
SetProFileString('c:\aa.ini','peld-1',up,字符串)

gflpower 2003-07-08

打赏
举报

看一下这两个函数
profilestring()
setprofilestring()

caoliyong 2003-07-08

打赏
举报

假如我知道了一个UP的值，用什么方法才能确定这个UP是[peld-1]下面的，还是[peld-2]下面的

payzq 2003-06-27

打赏
举报

zjp899 2003-06-26

打赏
举报

在vc里面是这么用的
char File[256];
char Temp[256];

wsprintf(File, ".\\*.ini");
if (_access(File, 00) == -1)
{
AfxMessageBox("请确认在当前目录下有 '*.ini' 文件");
return;
}

GetPrivateProfileString("peld-1", "up", "0", Temp, 20, ".\\*.ini");
//结果在Temp中

在vb中，没有用过，不知是否如此！

caoliyong 2003-06-24

打赏
举报

具体是这样的*.ini
[peld-1]
up=字符串
down=字符串
[deld-2]
up=字符串
down=字符串
请讲具体一点

yjw1018 2003-06-21

打赏
举报

先搬凳子占个位。

pling 2003-06-11

打赏
举报

应该在程序中说明吧，比如作一个命令选单，
ok?

如何访问 *.ini 里的数据，请各位指点一二！

相关推荐