Hej igen, nu har jag försökt två ggr med två olika saker, men inget funkar, nån som har nåt tips på vad jag ska göra?
Att få två varor i samma rad är inga problem men tre varor är problem...
Frågan#1
Hej
Har ställt denna fråga förr och då lyckades jag inte lösa problmet, så nu frågar jag igen fast med en lite annorlunda fil.
Frågan är alltså: Denna fil som följer listar upp ett antal varor från en databas, varannan rad (vara) grå och varannan mörkgrå.
Men jag vill ha så att den visar tre varor i varje rad: så här: http://www.pedalogerna.com/kona/index-Kona.htm
Är det helt omöjligt? jag kan inte så mycket om asp men jag tycker det är skitkul och vill lära mig mer, det är därför jag krånglar så mycket
Ha de bra allesammans
<%url = request.servervariables("URL")
query_str = request.servervariables("QUERY_STRING")
if request.querystring("p") then
%>
<!-- #INCLUDE FILE="settings.asp" -->
<html>
<head>
</HEAD>
<BODY>
<%
maingroup=Request.Querystring("maingroup")
secondgroup=Request.Querystring("secondgroup")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("midicart.mdb")
set rs=conn.execute("SELECT * FROM products where maingroup = '" & maingroup & "' AND secondgroup = '" & secondgroup & "' ORDER BY item")
%><FORM NAME="itemsform">
</form>
<CENTER>
<%
msgpp = 20
sql = "SELECT Count(*) AS msgs FROM products where maingroup = '" & maingroup & "' AND secondgroup = '" & secondgroup & "'"
set x = conn.execute(sql)
x = x("msgs")
if x > 0 then
nasta = (x / msgpp)
nound = Round(x / msgpp)
if nasta > Round(nasta) then
nound = Round(nasta)
elseif nasta < Round(nasta) then
nound = Round(nasta) -1
elseif nasta = Round(nasta) then
nound = Round(nasta) -1
end if
xx = request.querystring("p") * msgpp - msgpp
exnasta = (xx / msgpp)
end if
%>
<% if x > 0 then %>
<%if request.querystring("p") > 1 then
%>
<%end if%>
<div align="center"><font size="1" face="Verdana">Sida:
<% p = request.querystring("p") - exnasta
u = 0
do until u = exnasta
p = p --1
%>
<a href="<%=url%>?p=<%=p-1%>&maingroup=<%=maingroup%>&secondgroup=<%=secondgroup%>"><%=p-1%></a>
<% u = u --1
loop
%>
<b><%=request.querystring("p")%></b>
<% xy = nound - exnasta
sida = request.querystring("p")-1
y = 0
do until y = xy
sida = sida --1
%>
<a href="<%=url%>?p=<%=sida--1%>&maingroup=<%=maingroup%>&secondgroup=<%=secondgroup%>"><%=sida --1%></a>
<% y = y --1
loop %>
<% if exnasta = nound then%>
<% else%>
<%end if
end if%>
</div>
<br>
<table cellpadding="2" cellspacing="1" border="0">
<TR>
<TD BGCOLOR="#B3B3B3"><B><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=txt_art_no%></font></B></TD>
<TD BGCOLOR="#B3B3B3"><B><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=txt_item%></font></B></TD>
<TD BGCOLOR="#B3B3B3"><B><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=txt_price%></font></B></TD>
</TR>
<%
iCount = 0
x = 0
rs.move xx
Do until rs.EOF OR x = msgpp 'start the count
x = x --1
If Eval(iCount\2 = iCount/2) Then 'determine if the number is odd or even
%>
<tr bgcolor=#D9D9D9>
<TD><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<a href="prod_show.asp?art_no=<% =RS("art_no") %>" TARGET="main"><% =RS("art_no") %></A></FONT></TD>
</TD><TD><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<a href="prod_show.asp?art_no=<% =RS("art_no") %>" TARGET="main"><% =RS("item") %></A></FONT></TD>
<TD align=right><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><% = RS("price")%></FONT></TD>
<% Else %>
<tr bgcolor=#E9E9E9>
<TD><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<a href="prod_show.asp?art_no=<% =RS("art_no") %>" TARGET="main"><% =RS("art_no") %></A></FONT></TD>
</TD><TD><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<a href="prod_show.asp?art_no=<% =RS("art_no") %>" TARGET="main"><% =RS("item") %></A></FONT></TD>
<TD align=right><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><% = RS("price")%></FONT></TD>
<%
End If
iCount = iCount +1 'increment the counter
rs.MoveNext
Loop
response.write "</table>"
%>
</FORM>
</body>
</html>
<%else
response.redirect url&"?p=1&"&query_str
end if
%>