{ASP} Dynamisch koppelen aan database - Softwareontwikkeling

dinsdag 13 januari 2004 18:58

Acties:

Verwijderd

Topicstarter

Ik ben bezig een Databse te maken die webdriven is zeg maar...
voor school.
maar ik kom nu even niet uit het ASP gedeelte
ik krijg een of andere vage foutmelding en zit om het zo maar te zeggen met de handen in het haar...

Hier haal ik het eerste gedeelte uit de database waarbij ik een link maak van kingdom_location zodat die bij de volgende asp file alleen die waarden eruithaalt die dus de id van kingdom location hebben die je hebt aangeklikt

<% @ LANGUAGE=VBScript ENABLESESSIONSTATE=False %>
<%
Option Explicit
Response.Buffer = True
%>
<HTML><HEAD>

<TITLE>utopia</TITLE>
<BODY>
Utopia
<br>
<br>
<br>
<br>
<br>
<%
Dim DBConn, rs, DSN_CONNSTRING, SQLstring
set DBConn = server.createobject("ADODB.connection")
set rs = Server.CreateObject("ADODB.Recordset")
DSN_CONNSTRING="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN_CONNSTRING=DSN_CONNSTRING & "DBQ=" & server.mappath("utopia.mdb")
DBConn.Open DSN_CONNSTRING
SQLstring = "SELECT kingdom_location, networth, war_wins FROM kingdom"

rs.Open SQLstring, DBConn

if rs.EOF then 'traps for IF DB empty THEN:
Response.Write "No Data Found"
Response.End
end if
Response.Write "<TABLE><TR><TD width=100px>"
Response.Write "kingdom_location"
Response.Write "</TD>"
Response.Write "<TD width=200px>"
Response.Write "networth"
Response.Write "</TD>"
Response.Write "<TD width=200px>"
Response.Write "war_wins"
Response.Write "</TD></TR>"
while not rs.EOF

Response.Write "<TD><P>"
Response.Write "<a href=""kingdom_provinces.asp?id="& RS("kingdom_location") &""">"& RS("kingdom_location") &"</a>"
Response.Write "</TD>"

Response.Write "<TD><P>"
Response.Write RS ("networth")
Response.Write "</TD>"

Response.Write "<TD><P>"
Response.Write RS ("war_wins")
Response.Write "</TD>"

Response.Write"<TR>"
RS.MoveNext

wend

Response.Write "</table>"

%>

</BODY></HTML>

nou goed dat gaat allemaal goed maar nu het foute gedeelte
dan kom je dus hier uit....

<% @ LANGUAGE=VBScript ENABLESESSIONSTATE=False %>
<%
Option Explicit
Response.Buffer = True
%>
<%
'---- CursorTypeEnum Values ----
Const adOpenForwardOnly = 0
Const adOpenKeyset = 1
Const adOpenDynamic = 2
Const adOpenStatic = 3

'---- LockTypeEnum Values ----
Const adLockReadOnly = 1
Const adLockPessimistic = 2
Const adLockOptimistic = 3
Const adLockBatchOptimistic = 4

'---- CommandTypeEnum Values ----
Const adCmdUnknown = &H0008
Const adCmdText = &H0001
Const adCmdTable = &H0002
Const adCmdStoredProc = &H0004
Const adCmdFile = &H0100
Const adCmdTableDirect = &H0200

%>
<HTML><HEAD>

<TITLE>Utopia</TITLE>
<BODY>
<br>
<P>
<%
Dim DBConn, rs, DSN_CONNSTRING, SQLstring2, id
set DBConn = server.createobject("ADODB.connection")
set rs = Server.CreateObject("ADODB.Recordset")
DSN_CONNSTRING="DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN_CONNSTRING=DSN_CONNSTRING & "DBQ=" & server.mappath("utopia.mdb")
DBConn.Open DSN_CONNSTRING
id = Request.Querystring("id")
SQLstring2 = "SELECT * FROM kingdom_provinces WHERE kingdom_location = "& id &""
rs.Open SQLstring2, DBConn, adOpenStatic, adLockReadOnly, adCmdText
if rs.EOF then 'traps for IF DB empty THEN:
Response.Write "Geen gegevens gevonden in de database"
Response.End
end if

Response.Write "<TABLE BORDER=1><TR><TD>"
Response.Write "Kingdom number"
Response.Write "</TD>"
Response.Write "<TD>"
Response.Write "Province name"
Response.Write "</TD></TR>"

while not rs.EOF

Response.Write "<TD>"
Response.Write RS ("kingdom")
Response.Write "</TD>"

Response.Write "<TD>"
Response.Write RS ("province")
Response.Write "</TD>"

Response.Write"<TR>"
RS.MoveNext

Wend
Response.Write "</table>"

%>

</BODY></HTML>

Maar als hij dus deze moet runne krijg ik de volgende foutmelding
iemand een idee?
want ik weet het echt niet meer

Soort fout:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access-stuurprogramma] Syntaxisfout (operator ontbreekt) in query-expressie kingdom_location = 13:4.
/kingdom_provinces.asp, line 61

Soort browser:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.1.4322)

Pagina:
GET /kingdom_provinces.asp

de database erachter is gewoon access met de volgende tabellen:
kingdom
kingdom_location
networth
war_wins
kingdom_provinces
kingdom_location
province
province
province_name
networth
race
acres
title
peasants
employment
gold
happiness
runes
trade_balance
food
offence_points
defence_points
province_buildings
province
building
percentage
province_science
province
science
percentage
province_units
province
units
unitcount
real_army
province
type (type leger, aanvallend of verdedigend)
number(legernummer)
return_time
acres_gained
unittype
unitcount
enter_date (utopian datum waarop de data is ingevoerd)

Als iemand mij zou kunnen helpen graag...
dat zou ik zeer op prijs stellen..

een $_/-\o_$ $_/-\o_$ voor diegene die me helpt

dinsdag 13 januari 2004 19:06

Acties:

guanpedro

Live forever or die trying

Ik neem aan dat de regel waar de foutmelding naar verwijst deze code bevat?
SQLstring2 = "SELECT * FROM kingdom_provinces WHERE kingdom_location = "& id &""

uit de error lees ik "kingdom_location = 13:4"

Is 13:4 wel een geldig ID? Zo ja gebruik dan quotes, nu denkt hij dat het een berekening is gok ik.

Ik zie dat je de ID uit de querystring haalt zonder controle van de invoer. Let wel op dat je hiermee gemakkelijk een database onderuit kan halen door hier een drop table statement in te stoppen.

[ Voor 57% gewijzigd door guanpedro op 13-01-2004 19:14 . Reden: toevoegingen ]

PC: MSI-NEO2FISR P4-2.6HT@2.8 Dual-channel GEIL-PC3500 Intel CSA GB-LAN 9600PRO Pioneer DVR106 Server: Dual Xeon-2GHz 3Ware 7500-12 11x120GB RAID5 GB-LAN RH 9 2.4.22 Digicam: Sony DSC-F717

dinsdag 13 januari 2004 19:08

Acties:

Verwijderd

Is kingdom location wel een numeriek veld in je database? Anders zou je "" moeten gebruiken. Overigens, ik zou je HTML ook een beetje opschonen. Je maakt op deze manier tabellen zonder </tr>.

dinsdag 13 januari 2004 19:19

Acties:

gorgi_19

Kruimeltjes zijn weer op :9

ik krijg een of andere vage foutmelding en zit om het zo maar te zeggen met de handen in het haar...

En verwacht je dat we nu kunnen raden wat het is?

In ieder geval: Er is een complete debugtutorial, inclusief vaak voorkomende foutmeldingen. Zie: P&W FAQ - ASP

Digitaal onderwijsmateriaal, leermateriaal voor hbo

dinsdag 13 januari 2004 20:27

Acties:

.oisyn

Moderator Devschuur®

Demotivational Speaker

Je plempt je code neer, en je verwacht dat wij daar maar doorheen gaan spitten (die bovendien niet tussen code tags staat), op zoek naar de fout? Nee, zo werkt het hier niet.

Lees P&W FAQ - Het FAQ/Beleid topic en P&W FAQ - De "quickstart" nog eens door, daarin kun je vinden hoe je een topic moet openen, en wat wij van je verwachten. Veel succes

Give a man a game and he'll have fun for a day. Teach a man to make games and he'll never have fun again.