Visual Basic - Como incrementar una variable se que la debo guard

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil

Como incrementar una variable se que la debo guard

Publicado por Alejandro Limon (53 intervenciones) el 08/07/2003 18:18:16
Yo se que debo almacenar la variable en archivo y despuer leerla para poder incremenmtar s valor pero como se hace eso por favor
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Como incrementar una variable se que la debo gu

Publicado por Cecilia Colalongo (3117 intervenciones) el 08/07/2003 18:51:40
Puedes utilizar un archivo INI, pero tienes muchas formas. Con las API's para archivos INI GetPrivateProfileString para leerlo y WritePrivateProfileString para escribirlo.

Public 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

Public 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

strBuffer = String(255, " ")
WritePrivateProfileString "MiSeccion", "MiValor", "MiValor", App.Path + "\MiArchivo.ini"

GetPrivateProfileString "MiSeccion", "MiValor", "0", strBuffer,255, App.Path + "\MiArchivo.ini"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como incrementar una variable se que la debo gu

Publicado por jose carlos (243 intervenciones) el 09/07/2003 02:13:05
puedes hacerlo un poco mas fácil que con las API, sería de esta manera:

archivo.txt donde guardarás la variables

para leerla

OPEN DIRECTORIO+"ARCHIVO.TXT" FOR INPUT AS #1
INPUT #1,A
CLOSE #1

en a esta el valor leído

PARA GRABARLA
KILL DIRECTORIO+"ARCHIVO.TXT"
para borrar el archivo antes de volver a escribirlo

OPEN DIRECTORIO+"ARCHIVO.TXT" FOR OUTPUT AS #1
PRINT #1,VALOR
CLOSE #1

en valor está el valor a guardar

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Como incrementar una variable se que la debo gu

Publicado por jose carlos (243 intervenciones) el 09/07/2003 02:14:13
puedes hacerlo un poco mas fácil que con las API, sería de esta manera:

archivo.txt donde guardarás la variables

para leerla

OPEN DIRECTORIO+"ARCHIVO.TXT" FOR INPUT AS #1
INPUT #1,A
CLOSE #1

en a esta el valor leído

PARA GRABARLA
KILL DIRECTORIO+"ARCHIVO.TXT"
para borrar el archivo antes de volver a escribirlo

OPEN DIRECTORIO+"ARCHIVO.TXT" FOR OUTPUT AS #1
PRINT #1,VALOR
CLOSE #1

en valor está el valor a guardar

a todo esto supongo que debes incrementarla en varias ocasiones en que has abierto el programa, si no es ese el caso, la cosa es más fácil y sencilla
simplemente x=x+1

saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
sin imagen de perfil

RE:Como incrementar una variable se que la debo gu

Publicado por Alejandro Limno (53 intervenciones) el 09/07/2003 02:38:57
sabes asi es como lo intentado hacer pero no puedo me provoca un error u otro
lo que quiero es que si no existe el archivo primero lo aga que exista y despues en base al archivo creado incremente la variable "A" en un cada ves que se cargue el programa
si me mandras un ejemplo te lo agradeceria mucho
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar