webForumDet fria alternativet

Databas hantering

2 svar · 191 visningar · startad av Gaski

GaskiMedlem sedan juni 2000310 inlägg
#1

Jag håller på med en wap sida som innehåller ASP kod, ASP koden ska lista alla evenmang ifrån en speciel stad och ett specielt datum.

Följande sträng skickas till filen:

even.asp?stad=G%F6teborg&datum=Tor%203%2f9

Alltså stad=Göteborg och datum=Tor 3/8

Filen ser ut så här:

!--#include file="conn.asp" --><% 
  'send the right MIME type
  Response.ContentType = "text/vnd.wap.wml" 

  Dim SQLquery 
  Dim rsNoje
  Dim strEven

  Dim strStad
  Dim strDatum
  strStad = Request("stad")
  strDatum = Request("datum")

%>

<?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="card1" title="Visar evenemang.">
   
<p>
<% 
  SQLquery = "SELECT [even] FROM data WHERE stad = '" & strStad & "' AND datum = '" & strDatum & "'"
  response.write(SQLquery)
  set rsNoje = conn.Execute(SQLquery)
  
  if rsNoje.eof then
    rsNoje.close
    set rsNoje = nothing
    Response.write("Sorry, nothing happens in <br/>" & strStad & " at " & strDatum)
    Response.write("</p></card></wml>")
    Response.end
  end if

  Do while not rsNoje.eof
  strEven = rsNoje("even")

  Response.write("<br/><br/>- " & strEven &vbcrlf) 

rsShows.MoveNext
loop 
%>
<br/><br/>
<small>
<a href="index.asp">Tillbaka</a>
</small>
</p>
<% rsNoje.close
   set rsNoje = nothing
%>
</card>
</wml>

conn.asp:

<%	option explicit
	
	Dim conn    'connesione al database access
	
    Set conn = Server.CreateObject("ADODB.Connection")
	'DSN-less connection to access
    conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.Mappath("databas.mdb") & ";"
%>

databas.mdb innehåller en table: data.
Data innehåller: stad, datum och even.

När jag kör detta fryser WinWap (programmet som kan läsa wap sidor).

Vad är fel?

OBS!Skicka ej över till wml forumet, det är fel på ASP-koden i detta fall!

------------------
Gaski: Viktig IT-profil!!!

AGMedlem sedan mars 20001 266 inlägg
#2

Är det bara en miss i inklippning överst?
!--#include file="conn.asp" --><%

Annars:
<!--#include file="conn.asp" --><%

Testa också att lägga detta överst å sidan istället.
Response.ContentType = "text/vnd.wap.wml"

Föresten har du det online nånstans så kan jag se hur min wapbrowser reagerar.

Andreas

GaskiMedlem sedan juni 2000310 inlägg
#3

Jiipppiiii, jag fixade det själv (är världsbäst :e )!

Felet var att det stod rsShow.MoveNext istället för rsNoje.MoveNext.

att include syntaxet var fel var bara ett klipp fel.

Men tack ändå för hjälpen.

Jippiiiii.....

------------------
Gaski: Viktig IT-profil!!!

131 ms totalt · 3 externa anrop · v20260731065814-full.3ab8d573
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
129 ms — hämta tråd, inlägg och bilagor (db)