4 svar · 227 visningar · startad av Mav
Problem:
Allt funkar bra tills jag vill hämta information för resp. kund. DÅ får jag felmeddelandet:
ADODB.Fields fel '800a0cc1'
ADO kunde inte hitta objektet i mängden som överensstämmer med det begärda namnet eller numret.
rad 18
Hoppas ngn vet som är fel, fälten/objekten finns i databasen därav mitt problem.
<%
Kundnamn = Request.Querystring("Kundnamn")
Set fritid = Server.CreateObject("ADODB.Connection")
Set RecSet = Server.CreateObject("ADODB.Recordset")
fritid.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\fri_asp\databas\adressbok.mdb"%>
SQL = "SELECT * From adressbok WHERE Kundnamn = '" & Kundnamn & "'"
RecSet.Open SQL, fritid
%>
<% =RecSet("Kundnamn") %>
<DD><%= RecSet("Adress") %><br>
<DD><%= RecSet("Postnr") %>
<DD><%= RecSet("Ort") %><br><br>
<DD><%= RecSet("Infoblock1") %>
<DD><%= RecSet("Infoblock2") %>
------------------
//Mav
hade kunnar hjälpa dig mer exakt om du hade infogat hela sidan.
men problemet är att något av följade fält som ska läsas inte finns i databesen:
Kundnamn
Adress
Postnr
Ort
Infoblock1
Infoblock2
kolla så att alla fält finns i databasen och är rätt stavade
------------------
// David - Probably the best guy in the world
Samtliga fält finns i databasen. Hoppas ni kan hjälpa mig med mitt problem. Här följer samtliga sidor:
Sid1
<HTML>
<FORM METHOD = "POST" ACTION = "fritid_sok_ok.asp">
<TABLE BORDER = 1>
<TR>
<TD>Stad:
<TD><INPUT TYPE = "TEXT" NAME = "frisok">
<TD><INPUT TYPE = "SUBMIT" VALUE = "Sök">
</TR>
</TABLE>
</BODY>
</HTML>
Sid2
<HTML>
<BODY>
<%
Set fritid = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
fritid.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\fri_asp\databas\adressbok.mdb"%>
<%
SQL = "SELECT * From adressbok WHERE kundnamn LIKE '%" & Request.form("frisok") & "%' OR ort LIKE '%" & Request.form("frisok") & "%'"
rs.Open SQL, fritid
%>
<TABLE BORDER = 1>
<TR>
<TD ALIGN = CENTER><B>Namn</B>
<TD ALIGN = CENTER><B>Ort</B>
</TR>
<%
Do While Not rs.EOF
%>
<TR>
<TD><A HREF = fritid_htl.asp?Kundnamn=<%=rs("Kundnamn")%>><%=rs("Kundnamn")%></A>
<TD><%=rs("Ort")%><BR>
</TR>
<%
rs.MoveNext
Loop
%>
</TABLE>
</BODY>
</HTML>
Sid3
<HTML>
<BODY>
<%
Kundnamn = Request.Querystring("Kundnamn")
Set fritid = Server.CreateObject("ADODB.Connection")
Set RecSet = Server.CreateObject("ADODB.Recordset")
fritid.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\inetpub\wwwroot\fri_asp\databas\adressbok.mdb"%>
SQL = "SELECT * From adressbok WHERE Kundnamn = '" & Kundnamn & "'"
RecSet.Open SQL, fritid
%>
<H2>
<% =RecSet("Kundnamn") %>
</H2>
<DL>
<DT><B>Besöksadress:</B>
<DD><%= RecSet("Adress") %><br>
<DD><%= RecSet("Postnr") %>
<DD><%= RecSet("Ort") %><br>
<br>
<DT><B>Information:</B><br>
<DD><%= RecSet("Infoblock1") %>
<br>
<DD><%= RecSet("Infoblock2") %>
</DL>
</BODY>
</HTML>
------------------
//Mav
Vilken rad blir det fel på?
Rad 12 på sid 3.
ADODB.Fields fel '800a0cc1'
ADO kunde inte hitta objektet i mängden som överensstämmer med det begärda namnet eller numret.
------------------
//Mav