Jeg har på et tidspunkt postet et ligenende sprøgsmål som jeg fik
svar på, men nu er jeg løbet ind i vanskeligheder igen:
Jeg har en db jeg vil opdatere fra en form som sendes til
RWU.asp:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("tutorial.mdb")
Conn.Open DSN
strSQL = "UPDATE personer set "
strSQL = strSQL & "Firma='" & Request.Form("Firma") & "', "
strSQL = strSQL & "Branche='" & Request.Form("Branche") & "', "
strSQL = strSQL & "Kontaktperson='" &
Request.Form("Kontaktperson") & "', "
strSQL = strSQL & "CVRNummer='" & Request.Form("CVRNummer") & "',
"
strSQL = strSQL & "Town='" & Request.Form("Town") & "', "
strSQL = strSQL & "Land='" & Request.Form("Land") & "', "
strSQL = strSQL & "Leveringsadresse='" &
Request.Form("Leveringsadresse") & "', "
strSQL = strSQL & "Postnummer2='" & Request.Form("Postnummer2") &
"', "
strSQL = strSQL & "Town2='" & Request.Form("Town2") & "', "
strSQL = strSQL & "Land2='" & Request.Form("Land2") & "', "
strSQL = strSQL & "Filial='" & Request.Form("Filial") & "', "
strSQL = strSQL & "Att='" & Request.Form("Att") & "', "
strSQL = strSQL & "Password='" & Request.Form("Password") & "', "
strSQL = strSQL & "Postnummer='" & Request.Form("Postnummer") &
"', "
strSQL = strSQL & "Website='" & Request.Form("Website") & "', "
strSQL = strSQL & "Telefonnummer='" &
Request.Form("Telefonnummer") & "', "
strSQL = strSQL & "Mobiltelefon='" & Request.Form("Mobiltelefon")
& "', "
strSQL = strSQL & "Fax='" & Request.Form("Fax") & "', "
strSQL = strSQL & "Email='" & Request.Form("Email") & "', "
strSQL = strSQL & "Adresse='" & Request.Form("Adresse") & "', "
strSQL = strSQL & "Noter= '" & Request.Form("Noter") & "', "
strSQL = strSQL & "Handler= '" & Request.Form("Handler") & "', "
strSQL = strSQL & "Comp= '" & Request.Form("Comp") & "', "
strSQL = strSQL & "Rabat='" & Request.Form("Rabat") & "', "
strSQL = strSQL & " WHERE Id = '" & Request.Form("Id") & "'"
Conn.Execute(strSQL)
Conn.Close
Set Conn = Nothing
%>
Siden fejler i linien Conn.Execute (strSQL), af en eller anden
grund men når jeg udskriver sql'en får jeg følgende, som for mig
ser OK ud:
UPDATE personer set Firma='La Bottega', Branche='Slagter',
Kontaktperson='Peter', CVRNummer='Intet', Town='København S',
Land='Danmark', Leveringsadresse='Ollen 54', Postnummer2='2300',
Town2='Snekkersten', Land2='Danmark', Filial='La Bottega -
Lager', Att='Peter', Password='Blackie', Postnummer='2300',
Website='
www.la-bottega.dk', Telefonnummer='+45 39 69 10 62',
Mobiltelefon='Ingen', Fax='Ingen', Email='info@la-bottega.dk',
Adresse='isa', Noter= 'Under bemærkninger kan du notere alt i
mellem himmel og jord, som er vigtigt for det pågældende firma.
Antal ansatte, antal filialer, specieller leveringsaftaler etc.',
Handler= '200 flakser', Comp= 'La Bottega', Rabat='100', WHERE Id
= '64'
Jeg er *helt* blank!
--
Vil du lære at kode HTML, XHTML, CSS, SSI eller ASP?
- Pædagogiske tutorials på dansk
- Kom godt i gang med koderne
KLIK HER! =>
http://www.html.dk/tutorials