Jamne dt r da utroligt me den dato :(

Prøv med dette i stedet:

<%
Function FormatDato( pstrDate )
        dim strDate
    dim strDay
    dim strMonth
    dim strYear
    dim strConvertedDate
       
    strDate        = FormatDateTime( pstrDate, vbShortDate )   
    strDay        = day( strDate )
    if len( strDay ) = 1 then
        strDay = "0" & strDay
    end if       
    strMonth    = month( strDate )
    if len( strMonth ) = 1 then
        strMonth = "0" & strMonth
    end if               
    strYear        = year( strDate )   
       
    strConvertedDate = strMonth & "-" & strDay & "-" & strYear
       
    FormatDato = strConvertedDate
End Function

dato_start = FormatDato(datostart)
dato_slut = FormatDato(datoslut)

SQL = "INSERT INTO Tilbud (datostart, datoslut)"
SQL = SQL & " VALUES ("
SQL = SQL & "#" & dato_start & "#,"
SQL = SQL & "#" & dato_slut & "#"
SQL = SQL & ")"
Conn.Execute(SQL)
%>

Nu ved jeg ikke lige om det var en INSERT sætning du fiskede efter, men håber du kan se meningen i det.

Det er en UPDATE sætning jeg har , men det virker altså ikk!

Så prøver jeg da lige at lave de om til en UPDATE :-)

<%
Function FormatDato( pstrDate )
        dim strDate
    dim strDay
    dim strMonth
    dim strYear
    dim strConvertedDate
       
    strDate        = FormatDateTime( pstrDate, vbShortDate )   
    strDay        = day( strDate )
    if len( strDay ) = 1 then
        strDay = "0" & strDay
    end if       
    strMonth    = month( strDate )
    if len( strMonth ) = 1 then
        strMonth = "0" & strMonth
    end if               
    strYear        = year( strDate )   
       
    strConvertedDate = strMonth & "-" & strDay & "-" & strYear
       
    FormatDato = strConvertedDate
End Function

dato_start = FormatDato(datostart)
dato_slut = FormatDato(datoslut)

SQL = "UPDATE DinTabel SET "
SQL = SQL & "datostart = #" & dato_start & "#, "
SQL = SQL & "datoslut = #" & dato_slut & "# "
Conn.Execute(SQL)
%>

Du skal lige rette dit Tabelnavn til. Det er ikke testet, men jeg tror det bør virke.

jamn dt r faktisk lige meget for jeg ve godt hvorn man gør men dt virker ikke....

min kode er :

datostart = Request.Form("datostart")
datoslut = Request.Form("datoslut")

Function FormatDato( pstrDate )
        dim strDate
    dim strDay
    dim strMonth
    dim strYear
    dim strConvertedDate
       
    strDate        = FormatDateTime( pstrDate, vbShortDate )   
    strDay        = day( strDate )
    if len( strDay ) = 1 then
        strDay = "0" & strDay
    end if       
    strMonth    = month( strDate )
    if len( strMonth ) = 1 then
        strMonth = "0" & strMonth
    end if               
    strYear        = year( strDate )   
       
    strConvertedDate = strMonth & "-" & strDay & "-" & strYear
       
    FormatDato = strConvertedDate
End Function

dato_start = FormatDato(datostart)
dato_slut = FormatDato(datoslut)


strQ = "Update pzads set "
strQ = strQ & "kunde= '" & request("kunde") & "', "
strQ = strQ & "img= '" & request("img") & "', "
strQ = strQ & "url= '" & request("url") & "', "
strQ = strQ & "klik= '" & request("klik") & "', "
strQ = strQ & "vis= '" & request("vis") & "', "
strQ = strQ & "type= '" & request("type") & "', "
strQ = strQ & "setup= '" & request("setup") & "', "
strQ = strQ & "strW= '" & request("strW") & "', "
if request.form("datostart") <> "" then
strQ = strQ & "datostart= #"& dato_start & "#, "
strQ = strQ & "datoslut= #"& dato_slut & "#, "
end if
strQ = strQ & "strH= '" & request("strH") & "', "
strQ = strQ & "place= '" & request("place") & "' "
strQ = strQ & "Where id = " & request("id") & ""
objConn.Execute(strQ)

Hviken fejl får du?

Den samme....

Fejltype:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E07)
[Microsoft][ODBC Microsoft Access-driver] Datatyperne stemmer ikke overens i kriterieudtrykket.
/----------/plugin/pz-ads/admin.asp, line 51

Prøv lige at udskrive din strQ...

Erstat objConn.Execute(strQ) med:

Response.Write strQ
'objConn.Execute(strQ)

Hvad skriver den så? Jeg tror ikke umiddelbart at det er omkring dato-felterne der er noget galt, men jeg kan ikke lige huske hvordan det er da jeg ikke bruger Access længere.

Den udskriver flg.:

Update pzads set kunde= 'PeZZo Net & Multimedia', img= 'http://pezzo.dk/velkommen/logo.gif', url= 'http://www.pezzo.dk', klik= '0', vis= '', type= 'IMG', setup= '', strW= '', datostart= #03-23-2003#, datoslut= #03-30-2003#, strH= '', place= 'BundB' Where id = 8

og jeg kom til at se det er fordi jeg mangler den værdi som hedder "vis" har datatypen "tal" og da den ikke har nogen værdi giver det jo en fejl...

Upz, men alligevel tak for hjælpen...!

Selv tak. Godt du fik det til at virke.