/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Gemme i tidsformat
Fra : Niels Orla


Dato : 19-05-02 07:10

Jeg er ved at lave et lille program, som jeg skal bruge på mit arbejde.
Det færdige program skal kunne gemme data mange gange om dagen men må ikke
på noget tidspunkt overskrive eksisternde data og det skal kunne gemme
automatisk udenat jeg hver gang skal skrive en titel.Her tæanker jeg på at
gemme i datotidsformat.
Jeg skla lige bemærke at jeg er total newbie indenfor vb.

 
 
Harald Staff (19-05-2002)
Kommentar
Fra : Harald Staff


Dato : 19-05-02 10:52

Hei Niels

For eksempel
Format(Now, "yyyymmddhhmmss") & ".txt"

HTH. Beste hilsen Harald

"Niels Orla" <sonop@mjols.dk> skrev i melding
news:Xns9213530061997Sonopmjolsdk@193.88.15.201...
> Jeg er ved at lave et lille program, som jeg skal bruge på mit arbejde.
> Det færdige program skal kunne gemme data mange gange om dagen men må ikke
> på noget tidspunkt overskrive eksisternde data og det skal kunne gemme
> automatisk udenat jeg hver gang skal skrive en titel.Her tæanker jeg på at
> gemme i datotidsformat.
> Jeg skla lige bemærke at jeg er total newbie indenfor vb.



Niels Orla (19-05-2002)
Kommentar
Fra : Niels Orla


Dato : 19-05-02 20:21

"Harald Staff" <harald.staff@nrk.no> wrote in
news:ac7sj4$kvs$1@oslo-nntp.eunet.no:

> Hei Niels
>
> For eksempel
> Format(Now, "yyyymmddhhmmss") & ".txt"
>
> HTH. Beste hilsen Harald
>
> "Niels Orla" <sonop@mjols.dk> skrev i melding
> Hej Harald!
> Den kode får jeg fejl på hele tiden. Er du sikker på den er rigtig?
>


Harald Staff (20-05-2002)
Kommentar
Fra : Harald Staff


Dato : 20-05-02 08:07

"Niels Orla" <sonop@mjols.dk> wrote in message
news:Xns9213D93388EB2Sonopmjolsdk@193.88.15.201...

> > Format(Now, "yyyymmddhhmmss") & ".txt"

> > Den kode får jeg fejl på hele tiden. Er du sikker på den er rigtig?

Hvilken feil ? Kommer en error ? Hvordan ser koden din ut ? Detail please.

Beste hilsen Harald



sonop (20-05-2002)
Kommentar
Fra : sonop


Dato : 20-05-02 08:25


"Harald Staff" <harald.staff@eunet.no> skrev i en meddelelse
news:aca757$l11$1@oslo-nntp.eunet.no...
> "Niels Orla" <sonop@mjols.dk> wrote in message
> news:Xns9213D93388EB2Sonopmjolsdk@193.88.15.201...
>
> > > Format(Now, "yyyymmddhhmmss") & ".txt"
>
> > > Den kode får jeg fejl på hele tiden. Er du sikker på den er rigtig?
>
> Hvilken feil ? Kommer en error ? Hvordan ser koden din ut ? Detail please.
>
> Beste hilsen Harald
> Her den
>>>>Private Sub Gemsom_Click()
1 On Error GoTo CancelValgt
2 Dim FilNummer As Integer
3 Dim FilNavn As String
4 FilNummer = FreeFile
5 FilNavn = "i:\Register\reg\regi.txt "
6 Open FilNavn For Output As #FilNummer
7 Print #FilNummer, Now(), lblBrugernavn
8 Close #FilNummer
9 CancelValgt:
End Sub
>
>Mit problem er linie 5 regi.tst, som jeg gerne vil have om døbt til
datotidsformat, hver gang jeg gemmer.Derved får jeg konstant nye txt,er som
er lig med det tidspunkt de blev lavet.



Harald Staff (20-05-2002)
Kommentar
Fra : Harald Staff


Dato : 20-05-02 08:48

Prøv

5 FilNavn = "i:\Register\reg\" & Format(Now, "yyyymmddhhmmss") & ".txt"

Det kan teoretisk være at bane i krever 8.3 - navnekonvensjonen. I så fall
må vi finde på noget andet.

Jeg tror dit neste problem er linje 7, det komma skal lave problemer. Prøv
f.eks:

7 Print #FilNummer, Now() & chr(9) & lblBrugernavn

HTH. Beste hilsen Harald


"sonop" <sonop@mjols.dk> wrote in message
news:3ce8a4c0$0$78766$edfadb0f@dspool01.news.tele.dk...
>
> "Harald Staff" <harald.staff@eunet.no> skrev i en meddelelse
> news:aca757$l11$1@oslo-nntp.eunet.no...
> > "Niels Orla" <sonop@mjols.dk> wrote in message
> > news:Xns9213D93388EB2Sonopmjolsdk@193.88.15.201...
> >
> > > > Format(Now, "yyyymmddhhmmss") & ".txt"
> >
> > > > Den kode får jeg fejl på hele tiden. Er du sikker på den er rigtig?
> >
> > Hvilken feil ? Kommer en error ? Hvordan ser koden din ut ? Detail
please.
> >
> > Beste hilsen Harald
> > Her den
> >>>>Private Sub Gemsom_Click()
> 1 On Error GoTo CancelValgt
> 2 Dim FilNummer As Integer
> 3 Dim FilNavn As String
> 4 FilNummer = FreeFile
> 5 FilNavn = "i:\Register\reg\regi.txt "
> 6 Open FilNavn For Output As #FilNummer
> 7 Print #FilNummer, Now(), lblBrugernavn
> 8 Close #FilNummer
> 9 CancelValgt:
> End Sub
> >
> >Mit problem er linie 5 regi.tst, som jeg gerne vil have om døbt til
> datotidsformat, hver gang jeg gemmer.Derved får jeg konstant nye txt,er
som
> er lig med det tidspunkt de blev lavet.
>
>



sonop (20-05-2002)
Kommentar
Fra : sonop


Dato : 20-05-02 09:08


"Harald Staff" <harald.staff@eunet.no> skrev i en meddelelse
news:aca9gb$10f$1@oslo-nntp.eunet.no...
> Prøv
>
> 5 FilNavn = "i:\Register\reg\" & Format(Now, "yyyymmddhhmmss") &
".txt"
>
> Det kan teoretisk være at bane i krever 8.3 - navnekonvensjonen. I så fall
> må vi finde på noget andet.
>
> Jeg tror dit neste problem er linje 7, det komma skal lave problemer. Prøv
> f.eks:
>
> 7 Print #FilNummer, Now() & chr(9) & lblBrugernavn
>
> HTH. Beste hilsen Harald
>
>
> Juhuu, det var lige det jeg skulle bruge.
>Jeg siger mange tusind tak
>Med visual-basic hilsen
>Niels orla



Harald Staff (20-05-2002)
Kommentar
Fra : Harald Staff


Dato : 20-05-02 09:26


"sonop" <sonop@mjols.dk> wrote in message
news:3ce8aeeb$0$78771$edfadb0f@dspool01.news.tele.dk...

> > Juhuu, det var lige det jeg skulle bruge.

Velbekomme Niels.



Søg
Reklame
Statistik
Spørgsmål : 177552
Tips : 31968
Nyheder : 719565
Indlæg : 6408849
Brugere : 218887

Månedens bedste
Årets bedste
Sidste års bedste