Guardar fichero de texto

Foro de elhacker.net

Programación

Programación General

.NET (C#, VB.NET, ASP)

Programación Visual Basic (Moderadores: LeandroA, seba123neo)

Guardar fichero de texto

0 Usuarios y 1 Visitante están viendo este tema.

Páginas: [1]

Autor

Tema: Guardar fichero de texto (Leído 2,727 veces)

BenRu

The Prodigy

Desconectado

Mensajes: 4.006

Guardar fichero de texto

« en: 20 Junio 2007, 20:59 pm »

Hola.

Bueno, hace que no programo meses, y tengo la mente oxidada. :xD

Cuando queremos meter guardar el contenido de algo en un archivo, podemos usar:

Código:

Open "C:\texto.txt" for output as #1

Lo que pasa, es que yo quiero que el nombre "texto" sea el contenido de una variable, algo asi:

Código:

Open "C:\" & fecha & ".txt" For Output As #1

La variable "fecha" contiene la fecha actual del sistema, asi que el resultado deberia ser:

C:\20 06 07.txt

Pero no se como,he probado con Append y tampoco...

Aver si alguien me hecha una mano.

Un saludo


	En línea

Jareth

Desconectado

Mensajes: 334

Re: Guardar fichero de texto

« Respuesta #1 en: 20 Junio 2007, 21:16 pm »

Eso es debido a que al contener "/" pues da error,no puedes hacer esto: c:\16/8/.txt porque tira erro por las barras.
Solucion,quitarselas:

Código:

Private Sub Command1_Click()
Dim fecha As String, datos() As String
fecha = Date
datos = Split(fecha, "/")
Open "c:\" & datos(0) & datos(1) & datos(2) & ".txt" For Binary As #1
Put #1, , "hi"
Close #1
End Sub

Espero que te sirva.
Saludos.


	En línea

BenRu

The Prodigy

Desconectado

Mensajes: 4.006

Re: Guardar fichero de texto

« Respuesta #2 en: 20 Junio 2007, 21:25 pm »

Es que yo no he usado "Date", lo he hecho un poco mas complejo, con apis.

Código:

Private Declare Sub GetSystemTime Lib "kernel32" (lpSystemTime As SYSTEMTIME)
Private Type SYSTEMTIME
wYear As Integer
wMonth As Integer
wDayOfWeek As Integer
wDay As Integer
wHour As Integer
wMinute As Integer
wSecond As Integer
wMilliseconds As Integer
End Type

Private Sub Form_Load()

Dim SysTime As SYSTEMTIME



GetSystemTime SysTime

fecha = SysTime.wMonth & "-" & SysTime.wDay & "-" & SysTime.wYear & "  " & SysTime.wHour & ":" & SysTime.wMinute & ":" & SysTime.wSecond


End Sub

En ningun lado estoy metiendo " \ " $:-\$


	En línea

yeikos

Desconectado

Mensajes: 1.424

Re: Guardar fichero de texto

« Respuesta #3 en: 20 Junio 2007, 21:28 pm »

Pero estás utilizando los dos puntos : :rolleyes:


	En línea

BenRu

The Prodigy

Desconectado

Mensajes: 4.006

Re: Guardar fichero de texto

« Respuesta #4 en: 20 Junio 2007, 21:34 pm »

Cita de: YeIk0s en 20 Junio 2007, 21:28 pm

Pero estás utilizando los dos puntos : :rolleyes:

Jaja, cierto YeIk0s...aunque de todas maneras, sigue sin ir:

Código:

fecha = SysTime.wMonth & "-" & SysTime.wDay & "-" & SysTime.wYear & "  " & SysTime.wHour & "-" & SysTime.wMinute & "-" & SysTime.wSecond

Por ahi no hay caracteres no permitidos $:-\$

Se guarda sin nombre, pero sí con la extension .txt

Un saludo


	En línea

Hendrix

In The Kernel Land
Colaborador

Desconectado

Mensajes: 2.276

Re: Guardar fichero de texto

« Respuesta #5 en: 20 Junio 2007, 21:42 pm »

Código:

Dim fecha As String

fecha = Day(Now) & "-" & Month(Now) & "-" & Year(Now)
Open "C:\" & fecha & ".txt" For Binary As #1


	En línea

"Todos los días perdemos una docena de genios en el anonimato. Y se van. Y nadie sabe de ellos, de su historia, de su peripecia, de lo que han hecho, de sus angustias, de sus alegrías. Pero al menos una docena de genios se van todos los días sin que sepamos de ellos". - Juan Antonio Cebrián

BenRu

The Prodigy

Desconectado

Mensajes: 4.006

Re: Guardar fichero de texto

« Respuesta #6 en: 20 Junio 2007, 21:59 pm »

Gracias Hendrix. Ya está solucionado

Código:

Private Sub Command1_Click()
Dim fecha As String


fecha = Day(Now) & "-" & Month(Now) & "-" & Year(Now) & " " & Hour(Now) & "-" & Minute(Now) & "-" & Second(Now)
Open "C:\" & fecha & ".txt" For Binary As #1
End Sub

Un saludo


	En línea

Páginas: [1]

Ir a:

Mensajes similares
	Asunto	Iniciado por	Respuestas	Vistas	Último mensaje
	Guardar datos en Un Fichero Programación C/C++	mapers	1	2,239	5 Abril 2011, 23:22 pm por Akai
	Fichero de texto en java Java	maikmilk	7	4,030	16 Junio 2012, 02:32 am por Nortis
	guardar objecto en fichero « 1 2 » Java	betikano	13	6,750	24 Mayo 2014, 18:48 pm por betikano
	Leer fichero y guardar en variables Programación C/C++	Joaqqinn	6	4,716	13 Enero 2016, 23:43 pm por Orubatosu
	[c++]Guardar y cargar datos de un fichero .txt Programación C/C++	lordluisiv	4	5,399	28 Marzo 2019, 22:18 pm por lordluisiv