webForumDet fria alternativet

räkning med asp??

ASP

11 svar · 315 visningar · startad av tapani

Medlem sedan apr. 200093 inlägg
Frågan#1

Okej här är förutsättningarna..

Har en databas med kunder som bokat datum för evenemang..
För varje evenemang finns endast 29 platser..

Nu vill jag kunna få fram ur databasen hur många platser det finns kvar vid en förfrågning på datum..

Låt säga att jag har alternativet att kunna välja dag månad och år (formulär)
Och mot den här förfrågningen/bokningen kunna få svaret om det finns platser kvar eller om det är fullt.

Någon?

Tack på förhand..

Medlem sedan maj 2000175 inlägg
#2

hur ser databasen ut...?

Medlem sedan dec. 19995 874 inlägg
#3

Du skulle ju kunna summera antal bokningar det datumet tex nått sånt här (svårt när jag inte ser din databas)

men ungefär:

SQLStmt = "SELECT Sum(tabell.bokning) AS [boksum] FROM tabell WHERE Datum = " & Request.Form("Datum") & ""
SET RS = Connection.Execute(SQLStmt)

Där får du en summa och den summan kan du ju använda sedan för att se om bokningarna överstiger 29.

Tex.

IF RS("boksum") => 29 Then
blabla
Else
blabla
End If

Nått sånt?

------------------
Mvh
Patrik
aka Brimba

www.datormaklarna.se
patrik@datormaklarna.se

Medlem sedan apr. 200093 inlägg
#4

Det är en access-databas..

En tabell "Kunder" med KundID, Namn, adress etc och sedan Datum.

Skulle vilja ha funktionen inbakad i följande kod..

<<kund.asp>>
---------------------

<form method="POST" action="kundin2.asp">
<table width="440">
<tr>
<tr>
<td>
      <p><font color="#808080" face="Arial"><small>Kursdatum</small></font><br>
      <input type="text" name="kursdatum" size="8" value="ÅÅMMDD"></p>
</td>
</tr>
<   <p><input type="submit" value="Lägg Till" name="B1"></p>
    </form>	
-----------------
<<kundin2.asp>>

<!--#include virtual="/ha/adovbs.inc"-->
<%

	Set Connect = CreateObject("ADODB.Connection")
	Connect.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=I:\Inetpub\cgi-bin\sfs\kunder.mdb")
	Set rsKund = CreateObject("ADODB.RecordSet")
	Addera = "SELECT * FROM Kunder"

	rsKund.Open Addera, Connect, adOpenStatic, adLockOptimistic

	rsKund.AddNew

		rsKund("KursDatum") = Request.Form("kursdatum")
	
	rsKund.Update						
	rsKund.Close
	Connect.Close
%>

<font face="verdana" size="2">
Bokningen är genomförd!!!<br>
<BR>
Du kommer automatiskt tillbaka till Menyn...<BR>
<meta http-equiv="Refresh" content="3; URL=meny.asp">
<BR>
<BR>
<BR>
</HTML>

Satte in koden i kod-taggar

[Redigerat av emission den 27 jun 2000]

[Redigerat av tapani den 28 jun 2000]

Medlem sedan dec. 19996 721 inlägg
#5

Ett tips bara. Släng inte in så här långa kodexempel. 90% av koden har inte med saken att göra, det blir enormt tungt att sätta sig in i problemet, och risken är stor att ingen orkar svara.

Och kan någon förklara varför det helt plötsligt är så många som använder direktuppdatering av recordset (addnew, update etc.)? Det är inte bra.

mvh

[Redigerat av emission den 27 jun 2000]

Medlem sedan maj 2000175 inlägg
#6

emission:
håller med dig om att updatera recordset's på det där viset inte är så bra.

men jag tror att det används ofta för att det är lättare att lära sig och förstå, än det är att frobba med rena sql-satser... (bara en teori)

koden ser iofs mera lättläst ut om man uppdaterar med recordset's...

Medlem sedan maj 200062 inlägg
#7

Varför är det inte bra att använda tex RecSet.Update? Är det bättre att använda sqlsatser och connection.execute eller?

Medlem sedan apr. 200093 inlägg
#8

Sorry för den långa koden.
Ska tänka på det i framtiden.

Sant som Rymdknark säger, lättare att lära sig då jag är ny på detta (märks säkert) så vill jag kunna förstå vad jag gör och hur jag skall göra för att
få en funktion att fungera som jag vill.

Ni säger att detta sättet att uppdatera, lägga till nytt inte är bra??

Är det så att denna kod är tyngre för servern?

Medlem sedan dec. 19995 874 inlägg
#9

rymdknark, emission.

Jag använde alltid (addnew, update etc) innan emission visade mig hur man gjorde, men det var vid ett speciellt tillfälle, så jag har ingen aning om varför folk använder det, jag menar det första jag fick lära mig var i alla fall på det mer "normala" sättet. *klura*

------------------
Mvh
Patrik
aka Brimba

www.datormaklarna.se
patrik@datormaklarna.se

Medlem sedan mars 20002 836 inlägg
#10

Hello,

egentligen inte ett svar på original frågan men jag tror jag vet svaret på varför så många använder sig av det.

gå och kolla in webStudio så förstår ni varför. Det är deras asp-skola jag tänker på och där använder de sig av just rs.AddNew etc.

//Patrikb

------------------
=================================
** ZWGdesign **
=================================

Medlem sedan juni 20001 257 inlägg
#11

Just det. På Webstudio lärde jag mig ASP, och därmed också att använda AddNew osv.

Medlem sedan maj 200062 inlägg
#12

Men varför är det sämre en Sqlsatser?

262 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
135 ms — hämta tråd, inlägg och bilagor (db)
125 ms — ändringar (db)