---
title: "a good one"
type: "forum-thread"
url: "https://www.webforum.nu/amne/databaser-sql/46443-a-good-one"
topic: "Databaser & SQL"
topic_url: "https://www.webforum.nu/amne/databaser-sql"
author: "cupy"
published: "2002-06-22T23:50:35.000Z"
updated: "2002-06-25T01:19:21.000Z"
replies: 3
views: 208
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/databaser-sql/46443-a-good-one"
---

# a good one

## #1 — cupy, 2002-06-22T23:50Z

Den funkar inte korrekt och jag får inte felmeddelande heller! Den vill inte hämta den senaste inlägget helt enkelt

```
strSQL = "Select * From FILES WHERE ANNO = 'tj' AND LAND LIKE '%" & Request("land") & "%' AND KATEGORI LIKE '%" & Request("kategori") & "%' ORDER BY [DATUM] DESC"
```

Om jag tar bort anno då funkar perfekt.
ANNO är en kollumn med tjejjer eller killar\[tj  eller  ki\], och här sorterar jag ut de. 

Vad är felet ?

Permalänk: https://www.webforum.nu/p/46443

## #2 — LarsG, 2002-06-23T11:08Z

Jag ser inget fel i sql-satsen. Du får kontrollera att det verkligen finns någon post som uppfyller villkoren.

Permalänk: https://www.webforum.nu/p/704172

## #3 — renholm, 2002-06-23T14:39Z

om du bara ska hämta ett inlägg så kör med

```
SELECT TOP 1 * FROM .....
```

Permalänk: https://www.webforum.nu/p/704228

## #4 — cupy, 2002-06-25T01:19Z

Jag hämtar flera inlägg!
Men vad kan bli fel ? 
här är min kod kanske ni ser mer om jag visar allt

```
<%  intPage = Request("page") 
land = Request("land")
kategori = Request("kategori")
If isNumeric(intPage) = False Or intPage < 1 Then 
intPage = 1 
End If 
set objConn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet") 
strSQL = "Select Distinctrow * From FILES  WHERE ANNO='killar' AND land LIKE '%" & Request("land") & "%' AND KATEGORI LIKE '%" & Request("kategori") & "%' ORDER BY  DATUM DESC"
strDSN = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("databas.mdb") 
objConn.open strDSN
rs.Open strSQL, objConn, 3, 3 
If Rs.EOF Then 
Response.Write"Tyverr hittade ingen uppgifter i denna kategory/land"
Response.Write"<br><center>"
Response.Write "<a href='JavaScript:history.back(1)'>Tillbaka</a></center>"
Else
%>
<%= land %>
<%
strS = Request("land")
%>
<FORM name="land" action ="jw.asp" method="get"> 
<select name="land"> 
<font face="verdana, Helvetica" size=2> 
<option value="">------ ALLA LÄNDER -----</option>
<option<%If strS = "danmark" Then Response.Write " Selected"%>>Danmark</option>
<option<%If strS = "england" Then Response.Write " Selected"%>>England</option>
<option<%If strS = "norge" Then Response.Write " Selected"%>>Norge</option>
<option<%If strS = "sverige" Then Response.Write " Selected"%>>Sverige</option></select>  
    <%
strSt = Request("kategori")
%>          
			  <select name="kategori">
<option value=""> ----- KATEGORIER -----</option>
<option<%If strSt = "fysik" Then Response.Write " Selected"%>>fysik</option>
<option<%If strSt = "matte" Then Response.Write " Selected"%>>matte</option>
<option<%If strSt = "musik" Then Response.Write " Selected"%>>musik</option>
<option<%If strSt = "kemi" Then Response.Write " Selected"%>>kemi</option>
</select><p>
<INPUT type=submit value=S&Ouml;K name=Enter></FORM><br>
<% If anno=killar Then 
 response.write"killar &nbsp;"%><br>
<table style="TABLE-LAYOUT: fixed" align="center" cellspacing="2" cellpadding="0" border="0" WIDTH="560">
<tr valign="bottom">
	<td align=left WIDTH = 100><h4>Datum</h4></td>
	<td align=left WIDTH = 350><h4>&nbsp;&nbsp;&nbsp;Rubrik</h4></td>
	<td align=left WIDTH = 100><h4>Kategori</h4></td></tr></table>
<%
If Not (rs.BOF Or rs.EOF) Then 
rs.PageSize = 10 
rs.AbsolutePage = intPage 
intRecCount = rs.PageSize 
intPageCount = rs.PageCount 
Response.Write "<p><b>Sida " & intPage & " av " & intPageCount & "</b></p>" 
Do While Not rs.EOF And intRecCount > 0 %> 
<table style="TABLE-LAYOUT: fixed" align="center" cellspacing="0" cellpadding="0" border="0" WIDTH="600">
    <tr style="HEIGHT: 18px">
        <td align=left WIDTH = 90><h5><%= FormatDateTime(Rs("datum"),2)%></h5></td><td align=left WIDTH = 15 NOWRAP><%IF trim(Rs("filename") & "") <> "" then%>
<a href="uploaded/<%= replace(Rs("filename"),"_th", "_or") %>"><img src="mpix/pil.gif" border=0 alt="bild" height="9" width="10"></a><%end if%></td>
<td align=left WIDTH = 300 NOWRAP><a href="visa3.asp?id=<%=TRIM(Server.HTMLEncode(Rs("ID"))) %>"><% =TRIM(Server.HTMLEncode(Rs("rubrik")))%></a></td>
       <td align=left WIDTH = 120><h5>&nbsp;&nbsp;<% =TRIM(Server.HTMLEncode(Rs("land")))%></h5></td>
	    <td align=left WIDTH = 120><h5>&nbsp;&nbsp;<% =TRIM(Server.HTMLEncode(Rs("kategori")))%></h5></td>
    </tr><hr Size=1 NOSHADE Color="#FFFCC0"></table>
<% intRecCount = intRecCount - 1 
rs.MoveNext 
Loop 
End If 
rs.Close 
Set rs = Nothing 
Response.Write "<p>Gå til sida " 
For intNum = 1 To intPageCount 
Response.Write "<a href=""jw.asp?page=" & intNum & "&land=" & Server.URLEncode(land) & "&kategori=" & Server.URLEncode(kategori) & """>" & intNum & "</a> " 
Next 
End if
End if
%>
</div>
```

Permalänk: https://www.webforum.nu/p/704959

---

Tråden på webben: https://www.webforum.nu/amne/databaser-sql/46443-a-good-one