---
title: "Vad är fel?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/webbutveckling/20373-vad-är-fel"
topic: "Webbutveckling"
topic_url: "https://www.webforum.nu/amne/webbutveckling"
author: "Lazerzubb"
published: "2000-08-19T15:05:00.000Z"
updated: "2000-08-19T15:05:00.000Z"
replies: 0
views: 367
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/webbutveckling/20373-vad-är-fel"
---

# Vad är fel?

## #1 — Lazerzubb, 2000-08-19T15:05Z

\<!-- #include virtual="/land/adovbs.stm" --\>
\<%
Response.ContentType = "text/vnd.wap.wml"
%\>
\<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=D:\\inetpub\\wwwroot\\sok1.mdb"
If Request.QueryString("sok2") \<\> "" Then
SQL = "SELECT \* From sok WHERE Land LIKE '" & Request.QueryString("sok2")& "%'"
set RS=Connect.Execute(SQL)
If RS.EOF Then
Do until RS.EOF
%\>
\<?xml version="1.0"?\> 
\<!DOCTYPE wml PUBLIC "-//WAPFORUM//DTD WML 1.1//EN" "http://www.wapforum.org/DTD/wml_1.1.xml"\> 
\<wml\> 
\<card id="visa" title="rentonwww.com" newcontext="true"\> 
\<p\>
\<%=RS("Land")%\>
\</p\>
\</card\>
\<%
RS.MoveNext
Loop
end if
else
%\>Hittade inga hus i Landet eller Staden!\<%
End If

RS.close
set RS=Nothing
Connect.close
set connect=nothing
%\>

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

---

Tråden på webben: https://www.webforum.nu/amne/webbutveckling/20373-vad-är-fel