Jag undrar hur jag ska kunna få bilderna bredvid varandra i koden här neda, scriptet visar foton på dom 5 (3) sista inloggade, just nu lägger dom sig under varandra. <code> Hej Ola! Hej!Få bilderna bredvid varandra?
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/members.mdb")&";pwd=test"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * FROM members ORDER BY status DESC"
RecSet.Open Addera, Connect, adLockOptimistic
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<LINK REL=stylesheet HREF="style.css" TYPE="text/css">
</head>
<body bgcolor="#DDE3E8" leftmargin="1" topmargin="2" marginwidth="0" marginheight="0">
<%
X = 0
DO Until X = 3
X=X+1
%>
<table width="94%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td align="left" valign="absmiddle">
<div align="left">
<p>Är online "<%=RecSet("fnamn")%>"</p>
<img src="<%=RecSet("pressbild")%>" width="95" height="115" border="0"></a>
<%If RecSet("status") = "offline" Then%>
<%Else%>
<%End If%>
</div></td>
</tr>
</table>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
</body>
</html>Sv: Få bilderna bredvid varandra?
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/members.mdb")&";pwd=test"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * FROM members ORDER BY status DESC"
RecSet.Open Addera, Connect, adLockOptimistic
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<LINK REL=stylesheet HREF="style.css" TYPE="text/css">
</head>
<body bgcolor="#DDE3E8" leftmargin="1" topmargin="2" marginwidth="0" marginheight="0">
<table width="94%" border="0" cellspacing="0" cellpadding="3">
<tr>
<td align="left" valign="absmiddle">
<div align="left">
<%
X = 0
DO Until X = 3
X=X+1
%>
<p>Är online "<%=RecSet("fnamn")%>"</p>
<img src="<%=RecSet("pressbild")%>" width="95" height="115" border="0"></a>
<%If RecSet("status") = "offline" Then%>
<%Else%>
<%End If%>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
</div></td>
</tr>
</table>
</body>
</html>
</code>Sv: Få bilderna bredvid varandra?
Nu är jag inte med på vad du menade med ditt inlägg av scriptet för bilderna är fortfarande under varandra.
MickeSv: Få bilderna bredvid varandra?
Du försöker lägga in varje inloggad användare i en tabell och tabeller går inte att lägga i rad om man inte placerar tabellerna i celler eller använder CSS. Fast enklast är nog att lägga varje inloggad användare i en cell i en rad...
Ungefär något i stil med följande.
<code>
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("db/members.mdb")&";pwd=test"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * FROM members ORDER BY status DESC"
RecSet.Open Addera, Connect, adLockOptimistic
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<LINK REL=stylesheet HREF="style.css" TYPE="text/css">
</head>
<body bgcolor="#DDE3E8" leftmargin="1" topmargin="2" marginwidth="0" marginheight="0">
<table width="94%" border="0" cellspacing="0" cellpadding="3">
<tr>
<%
X = 0
DO Until X = 3
X=X+1
%>
<td align="left" valign="absmiddle">
<div align="left">
<p>Är online "<%=RecSet("fnamn")%>"</p>
<img src="<%=RecSet("pressbild")%>" width="95" height="115" border="0"></a>
<%If RecSet("status") = "offline" Then%>
<%Else%>
<%End If%>
</div></td>
<%
RecSet.MoveNext
Loop %>
</tr>
</table>
<%
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
</body>
</html>
</code>
Lycka till,
Tom S.