怎么写VB配置文件??

Question

怎么写VB配置文件??
就是在这个配置文件中有
conn rs user password Data Source  Initial Catalog

Answer 1

用xml文件来放这些配置信息嘛。很方便的就可以读写了。另外，如果有些东西是不会改变的你也可以放建一个模块文件房里面去。

Answer 2

可不可以是INI  ，用户配置文件？

Answer 3

这好像是个读写INI的问题。
你搜索一下以前的贴子。

Answer 4

Private Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, lpKeyName As Any, ByVal lpDefault As String, ByVal lpRetunedString 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 lplFileName As String) As Long
Public Function GetINI(AppName As String, KeyName As String, FileName As String) As String
 Dim RetStr As String
 RetStr = String(255, Chr(0))
 GetINI = Left(RetStr, GetPrivateProfileString(AppName, ByVal KeyName, "", RetStr, Len(RetStr), FileName))
End FunctionPublic Function WriteIni(AppName As String, KeyName As String, InString As String, FilePath As String) As String
 Dim r As Integer
 r = WritePrivateProfileString(AppName, KeyName, InString, FilePath)
End Function
操作代码
Private Sub Write_Click()
Call WriteIni("hoho", Text1.Text, Text2.Text, "d:\a.ini")
End SubPrivate Sub Read_Click()
Text2.Text = GetINI("hoho", Text1.Text, "d:\a.ini")
End SubINI的读写