Bueno quiero un codigo que a un .ini le escriba:
User: x
Dato: y
y que cuando se ejecute el programa lea
User: x y haga que el Text1.text = x
Dato: y y haga que el Text2.text = y
http://classicvisualbasic.com/foro/viewtopic.php?f=5&t=15&sid=22a3d3a769165c6d5d5fcd98b7d0a11f
(http://classicvisualbasic.com/foro/viewtopic.php?f=5&t=15&sid=22a3d3a769165c6d5d5fcd98b7d0a11f)
Cita de: naderST en 24 Mayo 2008, 21:43 PM
http://classicvisualbasic.com/foro/viewtopic.php?f=5&t=15&sid=22a3d3a769165c6d5d5fcd98b7d0a11f
(http://classicvisualbasic.com/foro/viewtopic.php?f=5&t=15&sid=22a3d3a769165c6d5d5fcd98b7d0a11f)
Escribir escribe, pero despues leerlos...
Debug.Print mInI.ReadData("x", "y", Text1.Text)
Suponte que este sea el ini:
[Persona]
Nombre=Pedro
Apellido=Rodriguez
Para leer el nombre y el apellido seria asi:
MsgBox mIni.ReadData("Persona", "Nombre")
MsgBox mIni.ReadData("Persona", "Apellido")
Cita de: naderST en 24 Mayo 2008, 22:12 PM
Suponte que este sea el ini:
[Persona]
Nombre=Pedro
Apellido=Rodriguez
Para leer el nombre y el apellido seria asi:
MsgBox mIni.ReadData("Persona", "Nombre")
MsgBox mIni.ReadData("Persona", "Apellido")
Pongo esto
Text1.Text = mInI.ReadData("Datos", "User")
y no me da error, pero tampoco rellena el text.
esa clase es exelente... funciona muy bien...
sl2
Lo que pasa es que no estas sabiendo utilizar la clase mira prueba asi:
Private Sub Form_Load()
mIni.Init
mIni.Path = App.Path
mIni.Filename = "\prueba.ini"
MsgBox mIni.ReadData("Persona", "Nombre")
MsgBox mIni.ReadData("Persona", "Apellido")
End Sub