Are you asking for db2000.B4J.INI library?Hi
I kindly request a working example on how to usethe jRLINI library.
Thanks
Hi
I kindly request a working example on how to usethe jRLINI library.
Thanks
Private tmpINI As jRLIni
UsaProxy.Initialize
tmpINI.Initialize(File.DirApp, "config.cfg")
UsaProxy.Host = tmpINI.getKey("ProxyHost","PROXY")
UsaProxy.Port = tmpINI.getKey( "ProxyPort","PROXY")
UsaProxy.Scheme = tmpINI.getKey ("ProxySchema", "PROXY")
UsaProxy.Username = tmpINI.getKey("ProxyUsername","PROXY")
UsaProxy.Password = tmpINI.getKey("ProxyPassword", "PROXY")
[PROXY]
ProxyHost=ip-number
ProxyPort=port-number
ProxySchema=http
ProxyUsername=name
ProxyPassword=password
Sub Process_Globals
Private WMIni As jRLIni ' Ini settings
End Sub
Sub AppStart (Args() As String)
' set things up
WMIni.Initialize(File.DirApp, "WMIni.ini")
Dim strDictFileName As String = "Dictionary.txt"
' Save them with a date and time stamp, although there appears to one automatically added at top of file.
WMIni.putKey("UpdateDateTime", DateTime.Date(DateTime.Now) & "-" & DateTime.Time(DateTime.Now))
WMIni.putKey("Dictionary", strDictFileName)
' Save the keys
WMIni.saveIni
' Clear the string to prove something was saved.
strDictFileName = ""
Log("Dictionary file = " & strDictFileName)
' Reload the Dictionary name
strDictFileName = WMIni.getKey("Dictionary", "Not Found")
Log("Dictionary file = " & strDictFileName)
End Sub