4 svar · 234 visningar · startad av timedia
Varför blir det Too few parameters. Expected 1. 
<!-- #include file="adovbs.inc" -->
<body bgcolor="#FFCC66">
<center>
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("mindb.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM Present WHERE Kommuner = " & Request.QueryString("kommun") & " "
'" & hund & "'"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>
<form method="POST" action="redakt2.asp">
<input type="hidden" name="AD" value="<% =Request.QueryString("kommun") %>">
<b>BRÖDTEXT</b><br>
<textarea rows="10" cols="60" name="brodtext"> <% =RecSet("Presentation") %></textarea><br>
<input type="submit" value="Uppdatera">
</form>
<% RecSet.Close
Connect.Close %>
Felmeddelandet brukar betyda att man skrivit fel på ett tabell- eller fältnamn.
Kan det vara så att fältet Kommuner är av texttyp? I så fall måste du sätta apostrofer runt värdet, annars tolkas det som ett fältnamn, och då kan du få det felmeddelandet.
Mvh,
Tabellnamn och kolumnnamn stämmer. Nu blir det Syntax error (missing operator) in query expression 'Kommuner ='.
Jag skapar länken till sida såhär: <a href="redakt1.asp?kommun=<% =RecSet("Kommun") %>">Presentation</a> och sidan ser nu ut såhär:
<!-- #include file="adovbs.inc" -->
<body bgcolor="#FFCC66">
<center>
<% Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("mindb.mdb")
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM Present WHERE Kommuner = "' & Request.QueryString("kommun") & '" "
'" & hund & "'"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic %>
<form method="POST" action="redakt2.asp">
<input type="hidden" name="AD" value="<% =Request.QueryString("kommun") %>">
<b>BRÖDTEXT</b><br>
<textarea rows="10" cols="60" name="brodtext"> <% =RecSet("Presentation") %></textarea><br>
<input type="submit" value="Uppdatera">
</form>
<% RecSet.Close
Connect.Close %>
Du har satt apostroferna på fel ställe.
Visa = "SELECT * FROM Present WHERE Kommuner = '" & Request.QueryString("kommun") & "' "
Mvh,
Nu funkar det. Tack Anders! 