opret bruger

<%
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>

<%
strSQL = "Insert into bruger (bandnavn) values('" & Request.Form("bandnavn") & "')"
conn.execute(strSQL) 'Denne linie
%>

<form action="opretband.asp" method="post">

Bandnavn<input type="text" name="bandnavn">


<input type="submit" value="Gem">
</form>

Du manglede at eksekvere sqlsætningen...

Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] The field 'bruger.scene' cannot contain a Null value because the Required property for this field is set to True. Enter a value in this field.

/test/opretband.asp, line 25

inde i din database under designvisning skal du vælge alle felter, nede i bunden skal du så sætte tillad længden 0 til JA / yes...

For ellers skal du skrive data ind i feltet når du skriver til databasen...

tilbage om 20 min

feltet der er rammet ind skal ændres til Ja i stedet...

http://ellebaek.dyndns.dk/exp/access.jpg

har rettet det og den siger nu:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Microsoft][ODBC Microsoft Access Driver] The field 'bruger.scene' cannot contain a Null value because the Required property for this field is set to True. Enter a value in this field.

/test/opretband.asp, line 25

det er den samme fejl som før, det betyder at det stadig ikke er tilladt at lade dette felt stå tomt..


Kan du ikke sende det til min mail, så kan jeg kigge på det for dig.
jens@mail.zix.dk

mener jeg har rettet det... se din mail tak.....:-)

Jeg har lige sendt databasen retur...

Problemet var at feltet var sat til at være obligatorisk, feltet over der hvor man sætter at feltet må være tomt...

Hvis det må være tomt men er obligatorisk, må det ikke være tomt alligevel, derfor skal det oprettes også...
Derfor skal det se ud som den db. jeg sendte retur

nu virker det ... hvad havde jeg gjort forkert ?

se kommentar 21/05-2003 13:24:55

du er en super helt... nu skal jeg til at kunne redigere i basen...

har du et "opdater" script på dig....

eller vil du have flere point..

sql = "update brugere set felt = '"&request.form("feltnavn")&"' where id = " & request("id")

hvis der er flere felter adskiller du dem bare med ","
altså:
sql = "update brugere set felt = '"&request.form("feltnavn")&"', felt2 = '"&request.form("feltnavn2")&"' where id = " & request("id")

Håber det er forståeligt...

hvordan lister jeg den ind i denne her..

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


Response.Write "<dt>Navn:</dt><dd>" & rs("bandnavn") & " " & rs("scene") & "</dd>"
Response.Write "<dt>Spilledag:</dt><dd>" & rs("spilledag") & "</dd>"
Response.Write "<dt>Spilledato:</dt><dd>" & rs("spilledato")  & "</dd>"

Conn.Close
Set Conn = Nothing
%>

er du der ?

kan fx. gøres sådan her...

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"', spilledato = '"&spilledato&"' where id = " & request.querystring("id")
set rs = Conn.execute(strSQL)
response.write("opdateret")

else
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)

response.write "<form method='post' action='test.asp?id=" & request.querystring("id") & "'>"
Response.Write "<dt>Navn:</dt><dd><INPUT type='text' value = '" & rs("bandnavn") & "' name='bandnavn'> <INPUT type='text' value = '" & rs("scene") & "' name='scene'></dd>"
Response.Write "<dt>Spilledag:</dt><dd><INPUT type='text' value = '" & rs("spilledag") & "' name='spilledag'></dd>"
Response.Write "<dt>Spilledato:</dt><dd><INPUT type='text' value = '" & rs("spilledato")  & "' name='spilledato'></dd>"
response.write "<br><INPUT TYPE='submit' NAME='update'>"

Conn.Close
Set Conn = Nothing
end if
%>

(jeg var lige ved at bikse noget sammen til dig...)

super,, hvordan får jeg flere felter i opret.asp

<%
strSQL = "Insert into bruger (bandnavn) values('" & Request.Form("bandnavn") & "')"
conn.execute(strSQL) 'Denne linie
%>

<form action="opretband.asp" method="post">

Bandnavn<input type="text" name="bandnavn">Scene<input type="text" name="scene">


<input type="submit" value="Gem">
</form>

strSQL = "Insert into bruger (bandnavn, felt2, felt3, osv) values('" & Request.Form("bandnavn") & "','" & Request.Form("felt2") & "','" & Request.Form("felt3") & "')"
conn.execute(strSQL) 'Denne linie

har lidt probs. med retband.asp
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Id ='.

/test/retband.asp, line 28

gåpr ud fra det er i update du får den fejl, så ret denne linie til:
response.write "<form method='post' action='retband.asp?id=" & request.querystring("id") & "'>"

du er den sejeste jeg kender......... :-) jeg vil gerne give flere point hvordan gør jeg det ?

Oppe under funktioner i venstre side er der en mulighed der hedder afsæt flere point, ved at klikke på den kan du afsætte flere point til dette spg...

det er velfortjent og jeg bukker....:-)

det er mig der takker...

//Jens

hej jens er du der ?

Jeps...

hvergang jeg går ind på opretband.asp og ikke skriver noget og går tilbage opretter den et band alligevel med tomme felter ?

<%
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>
<%
strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
%>

<center>
<form action="opretband.asp" method="post">
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" class="knap" >

</form>

<%
if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>
<%
strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
Alert = "oprettet"
end if
%>

<center>
<form action="opretband.asp" method="post">
<h1><%=Alert%></h1>
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" name="send" class="knap" >

</form>

hvor har du rettet ?

satte en if sætning omkring sql sætningen...

Problemet er at den før udførte sql-sætningen hver gang siden kaldes, nu gør den det kun når du trykker på gem...

if request.form("send") <> "" then
hi

præcis, det gør at den finder ud af om du har trykket på gem, hvis du har gør siden følgende...
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>
<%
strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
Alert = "oprettet"

Og ellers vises formen bare...
Jeg har så sat en linie ind, der skriver Hvis du har oprettet noget eller ej, for siden returnere til samme side, så du kan se formen igen, så står der bare Oprettet i toppen...

takker....

np... ;-)

nu får jeg blank side... den vil ikke vise noget
<%
if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>
<%
strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
%>

<center>
<form action="opretband.asp" method="post">
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" class="knap" >

</form>

kopier alt det jeg skrev i min kommentar fra før, og overskriv den fil du havde i forvejen, så virker det...

nu ser den sådan ud  og virker men oprette igen blanke profiler.....

<%
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>
<%
strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
Alert = "oprettet"

%>

<%
if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN
%>
<%
strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
Alert = "oprettet"
end if
%>

<center>
<form action="opretband.asp" method="post">
<h1><%=Alert%></h1>
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" name="send" class="knap" >

</form>

and there you have it................

kan jeg give point nu ???

jeg glemte at teste om man kunne oprette og nu gemmer den sgu ikke profilerne... shit

den skriver heller ikke "oprettet"

Prøv lige denne, og sig hvad den returnere...

<%
if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN

strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
'conn.execute(strSQL)
response.write(strSQL)
response.end
Alert = "oprettet"
end if
%>

<center>
<form action="opretband.asp" method="post">
<h1><%=Alert%></h1>
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" name="send" class="knap" >

</form>

Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('sfsdf','','','','','',', ')

<%
if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN

strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "')"
conn.execute(strSQL)
Alert = "oprettet"
end if
%>

<center>
<form action="opretband.asp" method="post">
<h1><%=Alert%></h1>
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="koncertvar" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
   

<input type="submit" value="Gem" name="send" class="knap" >

</form>

Dette burde altså virke...
Når den kun udskriver sql-en før, så kommer den jo i hvert fald til at eksekvere denne...!
Prøv den lige igen, ellers så send filen til min mail: jens@mail.zix.dk

jep nu er den der sgu..... !

:-)

jeg kan få den til at virker på den du har lavet. men jeg har en stor der ikke vil...........

hvorkan det være i koden på den det går galt.. er den skriver heller ikke opdateret selvom jeg har sat  <h1><%=Alert%></h1>

<%
if request.form("send") <> "" then
' ADODB connection objektet
Set Conn = Server.CreateObject("ADODB.Connection")
' Husk at angive den rigtige sti til din database
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("database.mdb")
' Åben databaseforbindelsen
Conn.Open DSN

strSQL = "Insert into bruger (bandnavn, scene, spilledag, spilledato, onstage, offstage, koncertvar, opret, anavn, atlf, amobil, amail, afax, tnavn, ttlf, tmobil, tmail, tfax, stnavn, sttlf, stmobil, stmail, stfax, snavn, smobil, smail, sfax, pnavn, ptlf, pmobil, pmail, pfax, onanv, otlf, omobil, omail, ofax, fohnanv, fohtlf, monnavn, montlf, lightsnavn, lightstlf, scenemod, scenevid, lysmod, lysvid, loadin, loadout, soundforce, kommerikke, erankommet, afbestilt, ri1, ri11, ri2, ri22, ri3, ri33, ri4 , ri44, ri5, ri55, ri6, ri66, ri7, ri77, ri8, ri88, konfintro, konfoutro, eintro, smoke, follow, fire, foto, events, specielle, others, arband, arcrew, anband, ancrew, antour, trt, trp, trm, trtr, trh, trn, tro, afband, afcrew, catalm, catveg, catvega, dress, dressin, dressout, radio, tv, merchan, fotoaf, note) values('" & Request.Form("bandnavn") & "','" & Request.Form("scene") & "','" & Request.Form("spilledag") & "','" & Request.Form("spilledato") & "','" & Request.Form("onstage") & "','" & Request.Form("offstage") & "','" & Request.Form("koncertvar") & "','" & Request.Form("opret") & "','" & Request.Form("anavn") & "','" & Request.Form("atlf") & "','" & Request.Form("amobil") & "','" & Request.Form("amail") & "','" & Request.Form("afax") & "','" & Request.Form("tnavn") & "','" & Request.Form("ttlf") & "','" & Request.Form("tmobil") & "','" & Request.Form("tmail") & "','" & Request.Form("tfax") & "','" & Request.Form("stnavn") & "','" & Request.Form("sttlf") & "','" & Request.Form("stmobil") & "','" & Request.Form("stmail") & "','" & Request.Form("stmail") & "','" & Request.Form("stfax") & "','" & Request.Form("snavn") & "','" & Request.Form("stlf") & "','" & Request.Form("smobil") & "','" & Request.Form("smail") & "','" & Request.Form("sfax") & "','" & Request.Form("pnavn") & "','" & Request.Form("ptlf") & "','" & Request.Form("pmobil") & "','" & Request.Form("pmail") & "','" & Request.Form("pfax") & "','" & Request.Form("onavn") & "','" & Request.Form("otlf") & "','" & Request.Form("omobil") & "','" & Request.Form("omail") & "','" & Request.Form("ofax") & "','" & Request.Form("fohnavn") & "','" & Request.Form("fohtlf") & "','" & Request.Form("monnavn") & "','" & Request.Form("montlf") & "','" & Request.Form("lightsnavn") & "','" & Request.Form("lightstlf") & "','" & Request.Form("scenemod") & "','" & Request.Form("scenevid") & "','" & Request.Form("lysmod") & "','" & Request.Form("lysvid") & "','" & Request.Form("loadin") & "','" & Request.Form("loadout") & "','" & Request.Form("soundforce") & "','" & Request.Form("kommerikke") & "','" & Request.Form("erankommet") & "','" & Request.Form("afbestilt") & "','" & Request.Form("ri1") & "','" & Request.Form("ri11") & "','" & Request.Form("ri2") & "','" & Request.Form("ri22") & "','" & Request.Form("ri3") & "','" & Request.Form("ri33") & "','" & Request.Form("ri4") & "','" & Request.Form("ri44") & "','" & Request.Form("ri5") & "','" & Request.Form("ri55") & "','" & Request.Form("ri6") & "','" & Request.Form("ri66") & "','" & Request.Form("ri7") & "','" & Request.Form("ri77") & "','" & Request.Form("ri8") & "','" & Request.Form("ri88") & "','" & Request.Form("smoke") & "','" & Request.Form("follow") & "','" & Request.Form("fire") & "','" & Request.Form("foto") & "','" & Request.Form("events") & "','" & Request.Form("specielle") & "','" & Request.Form("others") & "','" & Request.Form("arband") & "','" & Request.Form("arcrew") & "','" & Request.Form("anband") & "','" & Request.Form("ancrew") & "','" & Request.Form("antour") & "','" & Request.Form("trt") & "','" & Request.Form("trp") & "','" & Request.Form("trm") & "','" & Request.Form("trtr") & "','" & Request.Form("trh") & "','" & Request.Form("trn") & "','" & Request.Form("tro") & "','" & Request.Form("afband") & "','" & Request.Form("afcrew") & "','" & Request.Form("catalm") & "','" & Request.Form("catveg") & "','" & Request.Form("catvega") & "','" & Request.Form("dress") & "','" & Request.Form("dressin") & "','" & Request.Form("dressout") & "','" & Request.Form("radio") & "','" & Request.Form("tv") & "','" & Request.Form("merchan") & "','" & Request.Form("fotoaf") & "','" & Request.Form("note") & "')"
conn.execute(strSQL)
Alert = "oprettet"
end if

%>

vil den ikke hvis bare noget af koden i matcher ? den viser siden fint... men når jeg skriver band navn og gem vender den bare siden og gemmer det ikke ?

Husk at din knap til at gemme med skal hedde send...
<input type="submit" value="Gem" name="send" class="knap" >
Brug denne linie, så virker det...

jeg vil gerne have felter ind og stå rigtigt..

så at & rs("bandnavn") & kommer ned og stå i den rigtige tabel.. men det driller..


<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


Response.Write "Navn:</dt>" & rs("bandnavn") & " </dd>"
Response.Write "&nbsp;&nbsp;Scene:</dt>" & rs("scene")  & "</dd>"
Response.Write "&nbsp;&nbsp;Spilledag:</dt>" & rs("spilledag") & "</dd>"
Response.Write "&nbsp;&nbsp;Spilledato:</dt>" & rs("spilledato")  & "</dd>"
Response.Write "&nbsp;&nbsp;On Stage:</dt>" & rs("onstage")  & "</dd>"
Response.Write "&nbsp;&nbsp;Off Stage</dt>" & rs("offstage")  & "</dd>"
Response.Write "&nbsp;&nbsp;Koncertens varighed:</dt>" & rs("koncertvar")  & "</dd>"

Conn.Close
Set Conn = Nothing
%>
</dl><center>
<form action="opretband.asp" method="post">
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>

jeg har sendt dig en mail på den store fil.. den laver fejl igen.. shit... jeg vil så gerne have det virker.. :-)

det er måske i access basen.. jeg kigger lige efter.

Jeg forstår ikke helt det du mener med at du vil have bandnavn ned i den rigtige tabel... På min comp ser det meget pænt ud...!

den skal skrive det i TD width="60">Bandnavn<td><input type="text" name="bandnavn" class="Formindhold"></td></TD>

det gør den ikke

nu får jeg denne fejl nå jeg prøver at oprette Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in INSERT INTO statement.

/test/opretband.asp, line 25

se lige http://ellebaek.dyndns.dk/exp/opretband.asp?id=12

Den skriver det forskellige tabeller som du bad den om...

jep men Satyricon skal ned i feltet hvor der står bandnavn.. :-)

Skal det se ud som det gør nu??

yes sir

oki...

Så er det sådan her i stedet:
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


Response.Write "Navn:</dt>" & rs("bandnavn") & " </dd>"
Response.Write "&nbsp;&nbsp;Scene:</dt>" & rs("scene")  & "</dd>"
Response.Write "&nbsp;&nbsp;Spilledag:</dt>" & rs("spilledag") & "</dd>"
Response.Write "&nbsp;&nbsp;Spilledato:</dt>" & rs("spilledato")  & "</dd>"
Response.Write "&nbsp;&nbsp;On Stage:</dt>" & rs("onstage")  & "</dd>"
Response.Write "&nbsp;&nbsp;Off Stage</dt>" & rs("offstage")  & "</dd>"
Response.Write "&nbsp;&nbsp;Koncertens varighed:</dt>" & rs("koncertvar")  & "</dd>"

%>
</dl><center>
<form action="opretband.asp" method="post">
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%> class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>

jeg bliver nødt til at løbe.... håber du er der i morgen.
og sindsygt tak for alt...

Peter

jeg har nok desværre ikke så meget tid i morgen, er til eksamen og skal i biffen...

Men vi må se på det...

Hej Jens

Er du der ??

nu er jeg...

hvad me dnu :-) ?

det er ikke helt til at komme i kontakt med mig, men kan du ikke skrive til min mail, så kan jeg se hvad jeg kan gøre...
Så kan jeg også se på det, selvom du ikke er her...

jens@mail.zix.dk
//Jens!

det er pænt af dig..... jeg har bare et sidste sprg. så hvis du kommer på her i løbet af mandagen er jeg også online.. :-)

er du der

jeg er her nu...

super sejt...  jeg vil gerne have at "rettei band" kommer frem til tabller ligesom "opret band"  <%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"', spilledato = '"&spilledato&"' where id = " & request.querystring("id")
set rs = Conn.execute(strSQL)
response.write("<a href='default.asp'>bandoplysningerne er nu opdateret, tryk for at gå til forsiden")

else
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)

response.write "<form method='post' action='retband.asp?id=" & request.querystring("id") & "'>"
 

Response.Write "<dt>Navn:</dt><INPUT type='text' value = '" & rs("bandnavn") & "' name='bandnavn'>"
Response.Write "<dt>Scene</dt><INPUT type='text' value = '" & rs("scene") & "' name='scene'>"
Response.Write "<dt>Spilledag:</dt><INPUT type='text' value = '" & rs("spilledag") & "' name='spilledag'>"
Response.Write "<dt>Spilledato:</dt><INPUT type='text' value = '" & rs("spilledato")  & "' name='spilledato'></dd>"
Response.Write "<dt>On Stage:</dt><INPUT type='text' value = '" & rs("onstage")  & "' name='onstage'>"
Response.Write "<dt>Off Stage:</dt><INPUT type='text' value = '" & rs("offstage")  & "' name='offstage'>"
Response.Write "<dt>koncertensvarighed:</dt><INPUT type='text' value = '" & rs("koncertvar")  & "' name='koncertvar'>"
response.write "<br><INPUT TYPE='submit' NAME='update'>"

Conn.Close
Set Conn = Nothing
end if
%>

de skal i disse tabeller:
TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%>"  class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" value="<%=rs("scene")%>"class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" value="<%=rs("spilledag")%>" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" value="<%=rs("spilledato")%>" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" value="<%=rs("onstage")%>" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" value="<%=rs("offstage")%>" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" value="<%=rs("koncertvar")%>" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="opret" value="<%=rs("opret")%>"class="Formindhold"></td></TD>
    </TR>
    </TABLE>

virker det du har skrevet her ikke ??

Det ser ud til at skulle virke i hvert fald...

nej den viser ikke felterne i tabellerne...

den skal vise hvad der står og så skal jeg kunne rette i det...

Det skal være ligesom denne her til opret bare så jeg kan rette i felterne der kommer frem i tabbelen :

<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


Response.Write "Navn:</dt>" & rs("bandnavn") & " </dd>"
Response.Write "&nbsp;&nbsp;Scene:</dt>" & rs("scene")  & "</dd>"
Response.Write "&nbsp;&nbsp;Spilledag:</dt>" & rs("spilledag") & "</dd>"
Response.Write "&nbsp;&nbsp;Spilledato:</dt>" & rs("spilledato")  & "</dd>"
Response.Write "&nbsp;&nbsp;On Stage:</dt>" & rs("onstage")  & "</dd>"
Response.Write "&nbsp;&nbsp;Off Stage</dt>" & rs("offstage")  & "</dd>"
Response.Write "&nbsp;&nbsp;Koncertens varighed:</dt>" & rs("koncertvar")  & "</dd>"

%>
</dl><center>
<form action="opretband.asp" method="post">
<TABLE width="900" " class="Formindhold">
<TR>
    <TD > <TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%> class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" class="Formindhold"></td></TD>
    </TR>
    <TR>

se lige...

http://ellebaek.dyndns.dk/exp/opretband.asp

er det sådan det skal se ud ??

http://ellebaek.dyndns.dk/exp/opretband.asp?id=12

Jubiiiiiiiii yes for den da...............

' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"', spilledato = '"&spilledato&"' where id = " & request.querystring("id")
set rs = Conn.execute(strSQL)
response.write("<a href='default.asp'>bandoplysningerne er nu opdateret, tryk for at gå til forsiden")
response.end
else
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)

end if
%>

de skal i disse tabeller:
<form method='post' action='retband.asp?id=" & request.querystring("id") & "'>
<TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%>"  class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" value="<%=rs("scene")%>"class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" value="<%=rs("spilledag")%>" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" value="<%=rs("spilledato")%>" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" value="<%=rs("onstage")%>" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" value="<%=rs("offstage")%>" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" value="<%=rs("koncertvar")%>" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="opret" value="<%=rs("opret")%>"class="Formindhold"></td></TD>
    </TR>
    </TABLE>
<INPUT TYPE='submit' NAME='update'>

Så skal den se ud som dette...

' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"', spilledato = '"&spilledato&"' where id = " & request.querystring("id")
set rs = Conn.execute(strSQL)
response.write("<a href='default.asp'>bandoplysningerne er nu opdateret, tryk for at gå til forsiden")

end if
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


%>

de skal i disse tabeller:
<form method='post' action='retband.asp?id=" & request.querystring("id") & "'>
<TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%>"  class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" value="<%=rs("scene")%>"class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" value="<%=rs("spilledag")%>" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" value="<%=rs("spilledato")%>" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" value="<%=rs("onstage")%>" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" value="<%=rs("offstage")%>" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" value="<%=rs("koncertvar")%>" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="opret" value="<%=rs("opret")%>"class="Formindhold"></td></TD>
    </TR>
    </TABLE>
<INPUT TYPE='submit' NAME='update'>

eller som dette, så får du værdierne efter du har opdateret databasen skrevet i felterne igen... men du har stadig muligheden i linket i toppen for at gå tilbage til forsiden...

får denne :

Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in string in query expression 'id = "'.

/test/retband.asp, line 23
linie 23 = set rs = Conn.execute(strSQL)

du bliver nødt til at hente siden med
som:
retband.asp?id=12
eller et andet tal der findes i databasen...
ellers virker ingen af sql strengene..

samme fejl på eks 2

jamen det virker fint jeg trykker på et band og den tager felterne med og sætter dem rigtig ind og det hele ser fint.. så retter jeg noget og trykker update og så kommer fejlen... så den tager oplysnigerne rigtigt ind..

det forstår jeg ikke..
Det virker på min side...

men problemet må næsten være at id'et ikke kommer med...

' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"', spilledato = '"&spilledato&"' where id = " & request.querystring("id")
'set rs = Conn.execute(strSQL)
response.write(strSQL)
response.write("<a href='default.asp'>bandoplysningerne er nu opdateret, tryk for at gå til forsiden")
response.end
end if
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


%>

de skal i disse tabeller:
<form method='post' action='retband.asp?id=" & request.querystring("id") & "'>
<TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%>"  class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" value="<%=rs("scene")%>"class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" value="<%=rs("spilledag")%>" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" value="<%=rs("spilledato")%>" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" value="<%=rs("onstage")%>" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" value="<%=rs("offstage")%>" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" value="<%=rs("koncertvar")%>" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="opret" value="<%=rs("opret")%>"class="Formindhold"></td></TD>
    </TR>
    </TABLE>
<INPUT TYPE='submit' NAME='update'>

Prøv lige denne, og skriv hvad den skriver

update bruger set bandnavn='Alex', scene = 'Odeon', spilledag = 'fredag', spilledato = '' where id = " bandoplysningerne er nu opdateret, tryk for at gå til

den mangler altså id'et...

Kan du ikke sende hele filen til mig, så laver jeg den lige...!
Kan ikke lige umiddelbart se fejlen!

Jeg har lige sendt filen retur...

Det var fordi jeg havde lavet en fejl, glemte det med at man ikke bare kan tage kode fra et asp-tag og smide det over i html..

<form method='post' action='retband.asp?id=" & request.querystring("id") & "'>
Denne linie skulle selvfølgelig være:
<form method="post" action="retband.asp?id=<%=request.querystring("id")%>">

får desværre samme fejl ?
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"',  spilledag = '"&request.form("spilledag")&"' where id = " & request.querystring("id")
set rs = Conn.execute(strSQL)
response.write("<a href='default.asp'>bandoplysningerne er nu opdateret, tryk for at gå til forsiden")

end if
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


%>

de skal i disse tabeller:
<form method="post" action="retband.asp?id=<%=request.querystring("id")%>">
<TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%>"  class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" value="<%=rs("scene")%>"class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" value="<%=rs("spilledag")%>" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" value="<%=rs("spilledato")%>" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" value="<%=rs("onstage")%>" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" value="<%=rs("offstage")%>" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" value="<%=rs("koncertvar")%>" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="opret" value="<%=rs("opret")%>" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
<INPUT TYPE='submit' NAME='update'>

</BODY>
</HTML>

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN

if request.form("update") <> "" then
strSQL = "update bruger set bandnavn='"&request.form("bandnavn")&"', scene = '"&request.form("scene")&"', spilledag = '"&request.form("spilledag")&"' where id = " & request.querystring("id")
set rs = Conn.execute(strSQL)
response.write("<a href='default.asp'>bandoplysningerne er nu opdateret, tryk for at gå til forsiden")

end if
strSQL = "Select * From bruger Where Id = " & Request.Querystring("id")
Set rs = Conn.Execute(strSQL)


%>

de skal i disse tabeller:
<form method="post" action="retband.asp?id=<%=request.querystring("id")%>">
<TABLE>
    <TR>
        <TD valign="top" bgcolor="#FFCC66" width="950"><FONT SIZE="2" COLOR="#FF0000"><b>Bandoplysninger</FONT><TABLE>
    <TR>
        <TD width="60">Bandnavn<td><input type="text" name="bandnavn" value="<%=rs("bandnavn")%>"  class="Formindhold"></td></TD>
        <TD width="60">Scene<td><input type="text" name="scene" value="<%=rs("scene")%>"class="Formindhold"></td></TD>
        <TD width="60">Spilledag<td><input type="text" name="spilledag" value="<%=rs("spilledag")%>" class="Formindhold"></td></TD>
        <TD width="60">Spilledato<td><input type="text" name="spilledato" value="<%=rs("spilledato")%>" class="Formindhold"></td></TD>
    </TR>
    <TR>
        <TD width="60">On stage<td><input type="text" name="onstage" value="<%=rs("onstage")%>" class="Formindhold"></td></TD>
        <TD width="60">Offstage<td><input type="text" name="offstage" value="<%=rs("offstage")%>" class="Formindhold"></td></TD>
        <TD width="100">Koncert varighed<td><input type="text" name="koncertvar" value="<%=rs("koncertvar")%>" class="Formindhold"></td></TD>
        <TD width="70">Oprettet af<td><input type="text" name="opret" value="<%=rs("opret")%>" class="Formindhold"></td></TD>
    </TR>
    </TABLE>
<INPUT TYPE='submit' NAME='update'>

</BODY>
</HTML>

ha jeg fand fejlen... nu virker det............... vi havde skrevet spilledag to gange... der skulle stå spille dato... kan jeg give dig point nu ?

det var lige det jeg så også... :-)

Hvis du skal give point nu bliver du nødt til at oprette et nyt spg. under navn
point til ellebæk i overskrift

Derefter skal du i spørgsmålet skrive: ref http://www.eksperten.dk/spm/355325
Så kan jeg få pointsene der...