Aggiornamento News (passo 2 di 3)
<%
'My ASP program that given an ID, allows editing a record
myDSN="Driver=Microsoft Access Driver (*.mdb); DBQ=" & Server.MapPath("/database") & "/stortinews.mdb;"
set conntemp=server.createobject("adodb.connection")
conntemp.open myDSN
form_ID=request.querystring("which")
sqltemp="select * from [news]"
sqltemp=sqltemp & " where NewsID=" & form_ID
set rstemp=conntemp.execute(sqltemp)
form_ID=rstemp("NewsID")
form_Titolo=rstemp("Titolo")
form_Content=rstemp("Content")
form_Datat=rstemp("Datat")
rstemp.close
set rstemp=nothing
conntemp.close
set conntemp=nothing
%>
|
