Avatar billede loukas Mester
28. marts 2007 - 16:12 Der er 6 kommentarer og
1 løsning

dato på .csv

Jeg har lavet den her stump kode som opretter en .csv ud fra data hentet i en DB,
men jeg kan ikke få den til at vise en ny dato og klokkeslet når jeg har opdateret den?!?
Den bliver ved med at skrive: 28-03-2007 14:19:32
Hvilket ikke passer, når jeg kigger på .csvfilen "manuelt" er den ellers ganske rigtigt opdateret med et nyt klokkeslet, fx.:28-03-2007 16:10:40

Koden:
<%
Response.expires = 0
Response.AddHeader "PRAGMA", "NO-CACHE"


'Henter dato på filen:dinpris.csv
filename = "dinpris.csv"
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.GetFile(server.mappath(filename))
strOpdateret = file.DateCreated
Set file = nothing
Set fs = nothing
%>
<font face="verdana" size="1">Sidst opdateret:</font>
<font face="verdana" size="1"><b><% Response.Write strOpdateret %></b></font>
<br>
<a href="default.asp?forny=yes">Opdater fil</a>
<br>
<%
if Request.Querystring("forny") = "yes" then


Set fs = CreateObject("Scripting.FileSystemObject")
'sletter nuværende .csv fil
fs.DeleteFile(server.mappath(filename))

'opretter ny .csv fil
Set file = fs.CreateTextFile(server.mappath(filename))

linie = ""
'her bliver data hentet fra DB
linie = "TEST;TEST;TEST"
file.Writeline(linie)

file.close
set file=nothing
Set fs=nothing

end if
%>
Avatar billede kalp Novice
28. marts 2007 - 16:17 #1
uden at kende det objekt der så ser det jo ud til at den tager oprettelsesdato'en og ikke dato'en den sidst er opdateret.. "file.DateCreated" .. måske er der noget "file.DateUpdated" eller hvad ved jeg..
Avatar billede loukas Mester
28. marts 2007 - 16:20 #2
i koden jeg har lavet til at "opdaterer" liver den slettet og oprettet på ny.Set fs = CreateObject("Scripting.FileSystemObject")
'sletter nuværende .csv fil
fs.DeleteFile(server.mappath(filename)) <---- HER BLIVER DEN SLETTET

'opretter ny .csv fil
Set file = fs.CreateTextFile(server.mappath(filename)) <--OPRETTER NY .CSV
Avatar billede kalp Novice
28. marts 2007 - 16:27 #3
burde du ikke have

strOpdateret = file.DateCreated

efter

Set file = fs.CreateTextFile(server.mappath(filename))
Avatar billede loukas Mester
28. marts 2007 - 16:34 #4
Det giver ingen forskel ;-(
Avatar billede kalp Novice
28. marts 2007 - 16:38 #5
<%
Response.expires = 0
Response.AddHeader "PRAGMA", "NO-CACHE"


'Henter dato på filen:dinpris.csv
filename = "dinpris.csv"
Set fs = CreateObject("Scripting.FileSystemObject")
Set file = fs.GetFile(server.mappath(filename))
Set file = nothing
Set fs = nothing
%>


<%
if Request.Querystring("forny") = "yes" then


Set fs = CreateObject("Scripting.FileSystemObject")
'sletter nuværende .csv fil
fs.DeleteFile(server.mappath(filename))

'opretter ny .csv fil
Set file = fs.CreateTextFile(server.mappath(filename))

linie = ""
'her bliver data hentet fra DB
linie = "TEST;TEST;TEST"
file.Writeline(linie)
strOpdateret = file.DateCreated
file.close
set file=nothing
Set fs=nothing
end if
%>


<font face="verdana" size="1">Sidst opdateret:</font>
<font face="verdana" size="1"><b><% Response.Write strOpdateret %></b></font>
<br>
<a href="default.asp?forny=yes">Opdater fil</a>
<br>
Avatar billede loukas Mester
28. marts 2007 - 16:49 #6
OK, tak for hjælpen, din kode giver fejl:
Microsoft VBScript runtime error '800a01b6'

Object doesn't support this property or method: 'file.DateCreated'

Men jeg har løst det ved at skrive dato til DB i stedet.
Avatar billede loukas Mester
20. marts 2013 - 16:24 #7
luk
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester