webForumDet fria alternativet

Skriva ut Kategori samt Innehåll

ASP

10 svar · 828 visningar · startad av MickeA.com

Medlem sedan feb. 20034 441 inlägg
Frågan#1

Hej

Håller på med Administrationssystem tilll ett Galleri jag gjort, Asp / AspUpload / AspJpeg samt Access.

Nu ska jag göra delen som man använder för att ta bort kategorier / bilder.

JAg har två tabeller i min databas:

[b]tbl_cat[/b]
catID (ID)
catName (TEXT)
catDesc (PM)

[b]tbl_pic[/b]
ID (ID)
catID (Kategori ID)
strName (TEXT)

Nu är inte alla kolumner med, men dom mest intressanta iaf ;)
Har en idé om att lista sidean enl. följande:

Kategori 1
     Bild1
     Bild2
     Bild3

Kategori 2
     Bild1
     Bild2

Problemet är bara att jag inte har en aning om hur jag ska bära mig åt.
Nu har jag inte heller sökt, eftersom jag inte vet ngt vettigt att söka på.

Det ska även vara så att väljer man att radera en kategori, ska alla bilder i denna även raderas.

All hjälp jag kan få med det här tar jag tacksamt emot, för jag vet inte i vilken ände jag ska börja.

Tack!

Medlem sedan feb. 20034 441 inlägg
#2

Är det verkligen ingen som kan ge ngra tips på vägen? Jag kan inte komma på hur jag ska lösa det här, så hjälp på traven skulle vara kanon.

Medlem sedan dec. 19996 522 inlägg
#3

Hämta ut dem i ett recordset (alla kategorier och alla bilder med en inner join), loopa igenom rs:et, kolla om kategorin har ändrats i varje loop, isåfall skriv ut <br> och kategorinamnet

Medlem sedan mars 20015 287 inlägg
#4

Det ska väl inte vara alltför krångligt.
Loopa ut allt som du visar tillsammans med en checkbox.
(Kanske tillsammans med ett javascript så klickar du i kategorins checkbox blir alla under ikryssade.)
Annars tar du ju bara emot formuläret på nästa sida, kollar vilka bilder, eller hela kategorier, som ska raderas och gör det...
typ: http://www.webforum.nu/search.php?s=&action=showresults&searchid=569711&sortby=lastpost&sortorder=descending

/red. Jag kanske missuppfattar problemet...

Medlem sedan feb. 20034 441 inlägg
#5

erka skrev:

Hämta ut dem i ett recordset (alla kategorier och alla bilder med en inner join), loopa igenom rs:et, kolla om kategorin har ändrats i varje loop, isåfall skriv ut <br> och kategorinamnet

Tack för ett bra svar, det som du säger låter som ngt jag vill använda, men ajg vet inte riktigt hur jag ska utforma det, kanske du har lust att ge ett litet kodexempel?

Tack!

Medlem sedan dec. 19996 522 inlägg
#6

Vet du hur man hämtar ut ett recordset? har du skapat sqlfrågan ?

Medlem sedan feb. 20034 441 inlägg
#7

erka skrev:

Vet du hur man hämtar ut ett recordset? har du skapat sqlfrågan ?

ja och nej, jag vet inte hur jag ska utforma en inner join, samt hur jag (som du säger) ska kolla när kategorin byts ut.

Så själva SQLfrågan och hur jag ska bära mig åt för att kolla när kategorin byts ut behöver jag kodförslag på.

Tack!

Medlem sedan dec. 19996 522 inlägg
#8
SELECT c.catID, c.catName, c.catDesc, p.ID, p.catId, p.strName
FROM tbl_cat c INNER JOIN tbl_pic p ON c.catID = p.catId ORDER BY c.catName,p.strName;

Hämta ut ett rs från denna

Du skapar en temporärvariabel som du döper till priorCatId, 0 som startvärde. Sen först i loopen kollar du om dittRecordSet("CatId") skiljer sig från det i priorCatId, gör det detta skriver du ut kategorin med ett <br>. Sedan skriver du ut bildnamnet, länk eller vad du vill. Det sista du gör i loopen är att sätta priorCatId till dittRecordSet("CatId")

Detta är ett av många sätt att lösa det hela på, allt beror på hur stor datamängd du ska hämta ut, har du 12000 kategorier är inte detta sätt det lämpligaste.

Medlem sedan feb. 20034 441 inlägg
#9

Det där ser kanoners ut, får tacka så mycket för det svaret. Ska kolla mer på't när jag kommer hem från jobbet.

Det är inte 12.000 kategorier som tur är, utan det kommer max uppgå till 20st samtidigt.

Tack!

Medlem sedan feb. 20034 441 inlägg
#10

Jag börjar närma mig nu, men får följande fel:

Microsoft JET Database Engine error '80040e10' 

No value given for one or more required parameters. 

/hiss_new/admin/default.asp, line 440

Jag har fixat ihop koden:

priorCatId = 0

strSQL = "SELECT c.catID, c.catName, c.catDesc, p.ID, p.catId, p.strName " &_
				"FROM tbl_cat c " &_
				"INNER JOIN tbl_pics p " &_
				"ON c.catID = p.catId " &_
				"ORDER BY c.catName,p.strName;"

Set oRec = oConn.Execute(strSQL)

If Not oRec.EOF Then
	Do Until oRec.EOF
		If priorCatId = oRec("catID") Then
			Response.Write("<b>" & priorCatId & "</b><br><br>")
		End If

		Response.Write(oRec("strName") & "<br>")
	
		oRec.MoveNext
			priorCatId = oRec("catID")
	Loop
Else
	Response.Write("Det finns inga bilder...")
End If

På rad 440 finns Set oRec = oConn.Execute(strSQL)

Vad är det för fel jag har gjort?

Tack!

Medlem sedan feb. 20034 441 inlägg
#11

Bortse från föregående meddelande.
Jag sökte istället på detta felmess och kunde därigenom få fram att det troligen berodde på ett stavfel. Givetvis var det så även denna gång, så nu funkar allt som det ska.

Tack så mycket för hjälpen, nu funkar allt precis som det ska!

257 ms totalt · 4 externa anrop · v20260731065814-full.6fe65c25
117 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
120 ms — ändringar (db)