Notifikationer

Markér alle som læst Log ud

iggipop Nybegynder

29. januar 2004 - 10:15 Der er 33 kommentarer og
2 løsninger

asp bookingsystem

Hey!

søger et asp booking system hvor man fx ser et bord med grønne prikker om som symboliserer de frie pladser og så kan man klikke på et af dem og booke og så bliver prikken rød. ELLER noget i den stil. Jeg har søgt og fundet diverse bookingsystemer men ingen som er sådan. Anyone ?

Synes godt om

riishoj Nybegynder

29. januar 2004 - 13:05 #1

Må man spørge hvad du skal bruge det til?

Synes godt om

iggipop Nybegynder

29. januar 2004 - 13:21 #2

ja da...til noget netaften-reservation :o) hvofor ?

Synes godt om

riishoj Nybegynder

29. januar 2004 - 14:06 #3

Jeg har måske noget du kan bruge, men står og skal ud af huset. Vender tilbage senere.

Synes godt om

iggipop Nybegynder

29. januar 2004 - 14:51 #4

lyder dælme godt....glæder mig til du vender tilbage !

Synes godt om

riishoj Nybegynder

29. januar 2004 - 19:25 #5

Øv, har lige sendt noget, men det kommer ikke frem :-(

Synes godt om

riishoj Nybegynder

29. januar 2004 - 19:33 #6

Jeg ved ikke hvad der gik galt, men jeg prøver igen. Måske kan du lave noget lignende det her. Du laver først en tabel med det antal pladser der skal være ved bordet. Så sætter du noget a la der her ind.

<% strSQL = "SELECT *FROM (det du nu kalder din tabel i db'en)WHERE reservation='optaget'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=18% height=40 bgcolor=#FFFFFF><font color=#FFFFFF><A HREF='reserver_form.asp?reservation=fysik'><img border=0 src='greenball.gif' alt='Ledig'></font></td>"

Else

Response.Write"<td width=18% height=40 bgcolor=#FFFFFF><b><font color=#FFFFFF face='verdana' size='2'><img src='redball.gif' alt='Optaget'</td>"

rs.MoveNext

End if
next
Response.Write "</tr>"

Conn.Close
Set Conn = Nothing
%>

Du skal så lave en formular, som sender reservation=optaget til et script, der indsætter denne i db'en. Derudover skal du naturligvis også lave to små billeder, som jeg her har kaldt greenball.gif og redball.gif.

Synes godt om

iggipop Nybegynder

29. januar 2004 - 20:13 #7

Okie....men jeg forstår ikke helt hvordan jeg skal lave en firkant fx ud af det.
Fx.

*|-------|*
*| |*
*| |*
*|-------|*

hvor stjernerne så er en grøn eller rød prik afhængig af optaget/ledig. Skod tegning men forstår du hvad jeg mener ?

Synes godt om

iggipop Nybegynder

29. januar 2004 - 20:13 #8

Damn....der skulle ik være 'hakket' i bordet :D

Synes godt om

riishoj Nybegynder

29. januar 2004 - 20:49 #9

Du vil altså have lavet et bord med 8 pladser! Så kan du jo bare lave en tabel med 8 celler.

Synes godt om

iggipop Nybegynder

29. januar 2004 - 21:38 #10

Hmm.....ja hvis vi nu siger at jeg vil lave et bord med 8 pladser så kan jeg ikke finde ud af at 'skifte' plads pr. prik jeg skriver.....

Synes godt om

iggipop Nybegynder

29. januar 2004 - 21:54 #11

Det er nok mig der er fatsvag, men jeg kan godt finde ud af at udskrive prikkerne efter hinanden altså :
*
*
*
*
*
Men jeg kan ikke gennemskue hvordan jeg får dem udskrevet på række
**
**
**
eller for den sags skyld:
** **
** **
:o)

Synes godt om

riishoj Nybegynder

29. januar 2004 - 23:51 #12

Jeg har lavet et eksempel med et bord med 8 pladser. Hvis du vil prøve at køre det skal du opette en db med feltnavnene 'reservation', 'plads' og 'row'. Hvis du skriver optaget i 'reservation', 3 i 'plads' og 2 i 'row', så bliver plads 3 i 2. række reserveret. Det er selvfølgelig ikke meningen, at du skal sidde og indtaste reservationer i db'en, det klares med en formular og et indsætningsscript, men det kan give dig en ide om, hvordan du kan lave dit system.

<html>

<head>
<title>Bordreservation</title>
</head>

<body>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("xxx.mdb")
Conn.Open DSN

plads = Request.Querystring("plads")
row= Request.Querystring("row")

for plads = 1 to 4

Response.Write "<table>"
Response.Write "<tr>"
'Response.Write "<td width=18% height=40 align=center bgcolor=#669999><font face=Verdana size=2 color=#FFFFFF>" & plads & "</font></td>"
for row = 1 to 2
strSQL = "SELECT reservation FROM bordreservation WHERE reservation='optaget' AND plads='" & plads & "' AND row='" & row & "'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=18% height=40 bgcolor=#669999><font color=#FFFFFF><A HREF='reserver_form.asp?'><img border=0 src='greenball.gif' alt='Ledig'></font></td>"

Else

Response.Write"<td width=18% height=40 bgcolor=#669999><font color=#FFFFFF face='verdana' size='2'><img border=0 src='redball.gif' alt='Optaget'</font></td>"

rs.MoveNext

End if
next

Response.write"</tr>"
Response.write"</table>"

next

Conn.Close
Set Conn = Nothing

%>
</body>

</html>

/riishoj

Synes godt om

iggipop Nybegynder

30. januar 2004 - 10:24 #13

Perfekt mand....
Det er jo sejt....
Så skal jeg bare have en ID med på linket til hver af de 'ledige' pladser jo, men .. hmm...det skal jo være en hvor den selv ved hvilken row og plads der er klikket på ?!?

Synes godt om

riishoj Nybegynder

30. januar 2004 - 21:16 #14

Har du fået lavet systemet færdigt?

Synes godt om

iggipop Nybegynder

31. januar 2004 - 00:36 #15

Nope slet ikke..har ikke haft meget tid idag til at kigge på det.
Har lidt svært ved at gennemskue hvordan jeg skal få det til at ligne fx 2 borde med 8 pladser om hver !

Synes godt om

riishoj Nybegynder

31. januar 2004 - 08:08 #16

Hvor mange borde skal du have lavet, og skal der være 8 pladser ved hvert bord. Det er jo let at ændre antallet af pladser ved bordet, bare det er deleligt med 2. Hvis du skriver for plads = 1 to 6, så har du jo lige pludselig 12 pladser.

Synes godt om

iggipop Nybegynder

31. januar 2004 - 09:44 #17

Hejsa !

Jeg kan godt se princippet i det men når jeg så sidder og vil lave det så går klappen ned :D

Jeg vil gerne afsætte lidt flere point hvis du gider prøve at lave et eksempel til mig. Jeg vill gerne have det til at ligne http://www.darkzone.dk/booking.jpg
Ved godt at jeg ik lige fik lavet lige mange prikker i hver side, men det skal der selvfølgelig være :D

Synes godt om

riishoj Nybegynder

31. januar 2004 - 15:00 #18

Skal nok prøve at lave noget lidt senere

Synes godt om

riishoj Nybegynder

31. januar 2004 - 17:10 #19

Prøv det her

<html>

<head>
<title>Bordreservation</title>
</head>

<body><br><br><br>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("xxx.mdb")
Conn.Open DSN

plads = Request.Querystring("plads")
row= Request.Querystring("row")

for plads = 1 to 2

Response.Write "<table align=center width='80%'>"
Response.Write "<tr>"

'Response.Write "<td width=18% height=40 align=center bgcolor=#669999><font face=Verdana size=2 color=#FFFFFF>" & plads & "</font></td>"
for row = 1 to 6
strSQL = "SELECT reservation FROM bordreservation WHERE reservation='optaget' AND plads='" & plads & "' AND row='" & row & "'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF><A HREF='reserver_form.asp?'><img border=0 src='greenball.gif' alt='Ledig'></font></td>"

Else

Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF face='verdana' size='2'><img border=0 src='redball.gif' alt='Optaget'</font></td>"

rs.MoveNext

End if
next

Response.write"</tr>"
Response.write""

next

Conn.Close
Set Conn = Nothing

%>
<table>
<tr>
<td> <br><br><br></td>
</tr>

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("xxx.mdb")
Conn.Open DSN

plads = Request.Querystring("plads")
row= Request.Querystring("row")

for plads = 1 to 2

Response.Write "<table align=center width='80%'>"
Response.Write "<tr>"

'Response.Write "<td width=18% height=40 align=center bgcolor=#669999><font face=Verdana size=2 color=#FFFFFF>" & plads & "</font></td>"
for row = 1 to 6
strSQL = "SELECT reservation FROM bordreservation WHERE reservation='optaget' AND plads='" & plads & "' AND row='" & row & "'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF><A HREF='reserver_form.asp?'><img border=0 src='greenball.gif' alt='Ledig'></font></td>"

Else

Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF face='verdana' size='2'><img border=0 src='redball.gif' alt='Optaget'</font></td>"

rs.MoveNext

End if
next

Response.write"</tr>"
Response.write""

next

Conn.Close
Set Conn = Nothing

%>

</body>

</html>

Synes godt om

riishoj Nybegynder

31. januar 2004 - 18:24 #20

Da vi nu har 2 forskellige borde, skal du have indsat et felt i db'en, som jeg har kaldt "bord". Du skal så sætte bord til at være 1 eller 2. Her er scriptet med ændringer.

<html>

<head>
<title>Bordreservation</title>
</head>

<body><br><br><br>
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("../bord/skoleweb.mdb")
Conn.Open DSN

plads = Request.Querystring("plads")
row= Request.Querystring("row")

for plads = 1 to 2

Response.Write "<table align=center width='80%'>"
Response.Write "<tr>"

'Response.Write "<td width=18% height=40 align=center bgcolor=#669999><font face=Verdana size=2 color=#FFFFFF>" & plads & "</font></td>"
for row = 1 to 6
strSQL = "SELECT reservation FROM bordreservation WHERE bord='1' AND reservation='optaget' AND plads='" & plads & "' AND row='" & row & "'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF><A HREF='reserver_form.asp?'><img border=0 src='greenball.gif' alt='Ledig'></font></td>"

Else

Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF face='verdana' size='2'><img border=0 src='redball.gif' alt='Optaget'</font></td>"

rs.MoveNext

End if
next

Response.write"</tr>"
Response.write"</table>"

next

%>
<table>
<tr>
<td> <br><br><br></td>
</tr>

<%

plads = Request.Querystring("plads")
row= Request.Querystring("row")

for plads = 1 to 2

Response.Write "<table align=center width='80%'>"
Response.Write "<tr>"

'Response.Write "<td width=18% height=40 align=center bgcolor=#669999><font face=Verdana size=2 color=#FFFFFF>" & plads & "</font></td>"
for row = 1 to 6
strSQL = "SELECT reservation FROM bordreservation WHERE bord='2' AND reservation='optaget' AND plads='" & plads & "' AND row='" & row & "'"
set rs = Conn.Execute(strSQL)
if rs.EOF or rs.BOF then
Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF><A HREF='reserver_form.asp?'><img border=0 src='greenball.gif' alt='Ledig'></font></td>"

Else

Response.Write"<td width=16% height=40 align=center bgcolor=#669999><font color=#FFFFFF face='verdana' size='2'><img border=0 src='redball.gif' alt='Optaget'</font></td>"

rs.MoveNext

End if
next

Response.write"</tr>"
Response.write"</table>"

next

Conn.Close
Set Conn = Nothing

%>

</body>

Synes godt om

iggipop Nybegynder

31. januar 2004 - 23:05 #21

Nu er jeg så kommet så langt!
http://test.totalpc.dk/booking/index.asp

Det eneste jeg mangler at gennemskue nu er hvordan jeg får fat i præcis den rigtigt record når jeg klikker på et at de grønne områder. Jeg skal vel have noget id-værk med eller hur ?

Synes godt om

riishoj Nybegynder

01. februar 2004 - 09:57 #22

Prøv lige at få dit eksempel til at virke i asp først. Du fokuserer jo kun på design og lader mig gøre alt det hårde arbejde!

Synes godt om

iggipop Nybegynder

01. februar 2004 - 11:35 #23

Øøhh hvordan vil du have at jeg skal få det til at virke i asp, når jeg ikke ved hvordan jeg får sendt plads/row med til reserver_form.asp? Det har da ikke noget med design at gøre !!!

Synes godt om

riishoj Nybegynder

01. februar 2004 - 12:25 #24

Det du har i dit eksempel er ren html-kode. Prøv at kigge på mit eksempel og se hvordan tabellerne skrives i asp, og prøv så, om du kan få dine borde vist i asp!

Synes godt om

riishoj Nybegynder

01. februar 2004 - 12:32 #25

Din kode bliver jo ikke til asp-kode bare fordi du kalder det index.asp.

Synes godt om

iggipop Nybegynder

01. februar 2004 - 12:38 #26

Hehe....okay...nu fatter jeg altså ingen ting. Det er jo dit eksempel jeg bruger....ASP genererer jo HTML, så hvis du bare viser kilde så er det jo HTML :D Det er dit eksempel der ligger bag. Det eneste er at når jeg klikker på en grøn prik så kommer jeg over til reserver_form.asp og her skal den jo vide præcis hvilken row og plads den kommer fra for at kunne indsætte et navn, row og plads nr i databasen og det er det jeg ikke lige ved hvordan jeg får med! Taler vi forbi hinanden ?

Synes godt om

riishoj Nybegynder

01. februar 2004 - 14:26 #27

Næ, næ, hvis jeg viser kilde kan jeg slet ikke se koden, da alt som ligger inde imellem <%-----%> ikke bliver vist. Jeg kan jo se koden til dine 3 borde, når jeg viser kilde. Derfor kan du heller ikke komme videre med at få overført navn, row og plads.

Synes godt om

riishoj Nybegynder

01. februar 2004 - 21:25 #28

Pardon, du har selvfølgelig. ret. Man kan se tabellerne i "vis kilde" selv om man har skrevet i asp. Som kompensation for min dumhed skal jeg forære dig det du har bedt om et par gange!

<A HREF='indsaet_form.asp?plads=" & plads & "&row=" & row & "&bord=1&reservation=optaget'>

Jeg er ikke sikker på at man kan lave det sådan, at man får vist navnet på den som har reserveret ved mouse over, men man kan godt indsætte navnet i tabelcellen.

Synes godt om

iggipop Nybegynder

02. februar 2004 - 09:25 #29

Hejsa!
Nååee jeg sad også og lignede et stort spørgsmål-tegn da jeg havde læst din sidste kommentar :D Jeg prøver med det du har skrevet! Smid et svar så skal du få point for denne omgang, du har hjulpet mig langt hen ad vejen :D

Synes godt om

iggipop Nybegynder

02. februar 2004 - 09:32 #30

Hov du har jo svaret :o)

Synes godt om

riishoj Nybegynder

02. februar 2004 - 19:13 #31

Tak for point. Held og lykke med arrangementet!

Synes godt om

riishoj Nybegynder

02. februar 2004 - 19:28 #32

Hvordan laver du mouse-over effekten med navnet på den som har reserveret. Du har vel ikke skrevet alle navnene ind i koden alt='Anders' osv.

Synes godt om

iggipop Nybegynder

02. februar 2004 - 21:58 #33

Jo tak...det virker faktisk hvis du tester ovenstående link :o)
Jeg har bare tilføjet et felt i databsen der hedder navn og så gør jeg sådan her :

Response.Write"<td align=center bgcolor=#669999 height=30><font color=#FFFFFF face='verdana' size='2'><img border=0 src='firkantr.gif' alt='" & rs("navn") & "'></font></td>

Synes godt om

riishoj Nybegynder

02. februar 2004 - 22:35 #34

Ja selvfølgelig, så lærte jeg det. Tak skal du ha'.

Synes godt om

iggipop Nybegynder

03. februar 2004 - 09:00 #35

:o)

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	9	25/06/202622:20	29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS