16. marts 2006 - 18:09
Der er
2 kommentarer og
1 løsning
Hvordan gemmes datoen automatisk i .mdb
Jeg vil gerne have datoen med automatisk når når der tilføjes data til .mdb
Hvordan gør man lige det ??
>>>>> jeg bruger denne form
<FORM ACTION=savenewinfo.asp METHOD=POST id=form name=Form1 onsubmit="return FrontPage_Form1_Validator(this)" language="JavaScript">
<p><INPUT size=40 Name=AddBy></p>
<p><INPUT size=40 Name=Email></p>
<p><INPUT size=40 TYPE=Submit Value='Tilmeld' id=Submit1 name=Submit1></p>
</FORM>
>>>> jeg bruger dette script til at save med
<%
Dim rsSave
'Creating the Recordset Object
Set rsSave = Server.CreateObject("ADODB.RecordSet")
'Creating a DSN-Less connection to your Database
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("w8xr3of7q2hy6lz3.mdb")
rsSave.open "Banner", strDSN, adOpenDynamic, adLockOptimistic, adCmdTable
rsSave.addnew
rsSave("URL") = request.form("URL")
rsSave("AddBy") = request.form("AddBy")
rsSave("Email") = request.form("Email")
rsSave.update
rsSave.close
set rsSave = Nothing
response.redirect("Newrecord2.asp")
%>
Slettet bruger
16. marts 2006 - 18:18
#1
Hvad med:
<%
Dim rsSave
'Creating the Recordset Object
Set rsSave = Server.CreateObject("ADODB.RecordSet")
'Creating a DSN-Less connection to your Database
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("w8xr3of7q2hy6lz3.mdb")
rsSave.open "Banner", strDSN, adOpenDynamic, adLockOptimistic, adCmdTable
rsSave.addnew
rsSave("URL") = request.form("URL")
rsSave("AddBy") = request.form("AddBy")
rsSave("Email") = request.form("Email")
rsSave("dato") = date()
rsSave.update
rsSave.close
set rsSave = Nothing
response.redirect("Newrecord2.asp")
%>
- eller -
<%
Dim rsSave
'Creating the Recordset Object
Set rsSave = Server.CreateObject("ADODB.RecordSet")
'Creating a DSN-Less connection to your Database
strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("w8xr3of7q2hy6lz3.mdb")
rsSave.open "Banner", strDSN, adOpenDynamic, adLockOptimistic, adCmdTable
rsSave.addnew
rsSave("URL") = request.form("URL")
rsSave("AddBy") = request.form("AddBy")
rsSave("Email") = request.form("Email")
rsSave("dato") = now()
rsSave.update
rsSave.close
set rsSave = Nothing
response.redirect("Newrecord2.asp")
%>
- du kan selvfølgelig også bare skrive dette som standardværdi i tabel-designvisningen...
\Dan