Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Varor i webshop

Postades av 2003-11-26 19:20:04 - Andreas Karlsson, i forum asp - allmänt, Tråden har 3 Kommentarer och lästs av 442 personer

Har ett litet problem innan jag kan färdigställa webshopen. Presentationen av varorna.
De hamnar bara en vara på varje rad...skulle vilja ha 3 st varor på samma rad innan den byter till nästa. Mycket tacksam för er som kan hjälpa mig..

här är koden:
<code>
<% @ EnableSessionState=False %>
<% Option Explicit ' Vi vill ha koll på våra variabler
%><!--#include file="prevent_cache.asp"--><!--#include file="connection.asp"--><%
Dim numRecords, v, Selected

%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">

<html>
<head>
<title>shCats - Kategorierna</title>
<link rel="STYLESHEET" type="text/css" href="Style.css">
</head>

<body BGCOLOR="#FFFFFF">
<P>Frossa mellan våra varor, välj en kategori:<p>
<%
'* Vi listar de aktuella kategorierna ( Tabellen shCats )
Set Rs = Server.CreateObject("ADODB.Recordset")
Rs.Open "SELECT * FROM shCats ORDER BY [name]",Conn,1,1
numRecords = Rs.RecordCount-1 ' Vi lägger antalet poster i en variabel

For v=0 To numRecords
Selected = ""
IF cStr(Rs.Fields("id").Value) = Request.QueryString("category") Then Selected = "Selected"

Response.Write "" & UCase( Rs.Fields("name").Value ) & "&nbsp;&nbsp;"
Rs.MoveNext
next
Rs.Close
%>





<%
' Om man valt en kategori så hämtar vi varorna i den

If Request.Querystring("category")<>"" THEN
Response.Write "<hr noshade size=1 color=""#EEEEEE"">"

Rs.Open "SELECT * FROM shItems WHERE category=" & Request.QueryString("category")
numRecords = Rs.RecordCount -1


For v=0 To numRecords%>
<TABLE CELLSPACING=0 CELLPADDING=0 BORDER=0
<% If Rs.Fields("smallImage")<>"" THEN %>
<TR><TD COLSPAN=2 ><IMG SRC="shImg/small/<%=Rs.Fields("smallImage")%>"></TD></TR>
<% End If %>

<TR>
<TD COLSPAN=2 CLASS="Item"><%=Rs.Fields("title").value%></TD>
</TR>

<TR>
<TD CLASS="Item">Pris:</TD>
<TD CLASS="Item" ALIGN=RIGHT><%= Rs.Fields("price").Value %> kr</TD>
</TR>

<TR>
<TD CLASS="Item">">Info</TD>
<TD CLASS="Item" ALIGN=RIGHT>" target="basket">Köp!</TD>
</TR>

</TABLE>
<%
Rs.MoveNext
Next
Rs.Close


End If %>
<br>


</body>
</html>
<%
' CleanUp
Conn.Close
Set Conn = Nothing

%>
</code>


Svara

Sv: Varor i webshop

Postades av 2003-11-27 15:53:37 - Andreas Karlsson

snälla ingen som har något förslag


Svara

Sv: Varor i webshop

Postades av 2003-11-27 20:52:20 - Peter Björklund

Du kanske måste lägga alla varor i en array som du sedan kan loopa ut i varor om tre.


Svara

Sv: Varor i webshop

Postades av 2003-11-27 22:02:36 - Anders Friborg

Iom att du presenterar varje vara i en helt egen tabell så finns det bara ett sätt som jag kan komma på. Det är att göra en till for-sats som skapar en tabell med tre cells per rad och placerar varje varu-tabell i dessa. Ingen bra lösning tror jag.

Om du där emot ändrar om i din presentation och lägger all presentations data (title, price,info,köp) i en cell då blir det mkt lättare. Använd isf följande struktur:

<code>
...
numRecords = rs.recordcount - 1

iRow = 1

Response.write("<table>")
For i = 0 To numRecords
If iRow = 1 Then
Response.Write("<tr>")
Response.Write("<td>")
Response.Write("Vara" & i)
Response.Write("</td>")
iRow = iRow + 1
ElseIf iRow = 3 Then
Response.Write("<td>")
Response.Write("Vara" & i)
Response.Write("</td>")
Response.Write("</tr>")
iRow = 1
Else
Response.Write("<td>")
Response.Write("Vara" & i)
Response.Write("</td>")
iRow = iRow + 1
End If
Rs.MoveNext
Next
Response.write("</table>")</code>

Har inte kollat att det fungerar men det borde det göra -> finns enklare sätt ändå att lösa detta men jag är lite för trött nu tror jag.

Lycka till!


Svara

Nyligen

  • 17:54 Vegastars New Zealand
  • 16:56 Verde Casino Danmark
  • 13:54 Vegastars: Top Australian Online C
  • 21:28 Chicken Road Casino Game
  • 21:21 1xBet Promo Code 2025
  • 18:37 Remove the bumper in AUDI
  • 15:35 Chicken road crash game
  • 21:41 Automotive Services UK

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 941
27 965
271 783
754
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies