On Tue, 21 Aug 2001 13:52:10 +0200, "Mark S. Rasmussen" <mark@tv.dk>
wrote:
>Hej jørn. Tak for svaret... men url'en virker desværre ikke...
Hej Mark
Hos mig virker den nu OK ...
<URL:
http://groups.google.com/groups?ic=1&q=msgid:3ADAF1BD.AE9CB4B%40hotmail.com>
Så jeg kopierer lige indholdet:
------------------
Magnus wrote:
>
> Fx. dagen idag 16-04-2001 bliver til 01-04-2016 og det selv om
> jeg bruger værdien Now i min SQL indsætnings linie.
>
> Hvor er det det går galt ? Du laver sikkert en sql, som ser ca. sådan ud:
sql = "INSERT INTO forum (f_dato, f_tekst) VALUES ('" & Now & _
"', '" & Replace(f_tekst, "'", "''") & "')"
Men dette resulterer jo måske i en sql indeholder teksten:
INSERT INTO forum (f_dato, f_tekst) VALUES ('16/4/01', 'bla')
Og når databasen prøver at læse det, går det galt. Det du skal gøre er
at huske på, at sql-strengen er en tekst og
konstuerer din sql'streng sådan:
sql = "INSERT INTO forum (f_dato, f_tekst) VALUES (Now, '" & _
Replace(f_tekst, "'", "''") & "')"
Eller hvis du vil have en bestemt dato:
sql = "INSERT INTO forum (f_dato, f_tekst) VALUES (" & _
DateToSql(f_date) & ", '" & _
Replace(f_tekst, "'", "''") & "')" Function DateToSql(Value)
DateToSql = "DateSerial(" & Year(Value) & ", " & _
Month(Value) & ", " & _
Day(Value) & ") + " & _
"TimeSerial(" & Hour(Value) & ", " & _
Minute(Value) & ", " & _
Second(Value) & ")"
End Function
--
Lauritz
------
Good luck,
Jørn