sortera kompislistan

8 svar · 230 visningar · startad av urban 10 feb. 2002

urbanMedlem sedan nov. 2001124 inlägg

Trådstart10 feb. 2002 13:13#1

hur sorterar man dom som e online uppe och dom som e offline nere och sorterad efter namnet

så här ser hela kompislistan ut:

<!-- #include file="adovbs.inc" -->

<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="#FFFFFF" text="#000000">
<table width="150" border="0" cellspacing="2" cellpadding="2" >
  <tr> 
    <td valign="top" bgcolor="#CCCCCC"> <font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#000000"> 

<%
Set Connect2 = Server.CreateObject("ADODB.Connection") 
Connect2.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("members.mdb")&";pwd=losen"

Set RecSet2 = Server.CreateObject("ADODB.Recordset")

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("kompisar.mdb")&";"

Set RecSet = Server.CreateObject("ADODB.Recordset")

Addera = "Select * From kompis Where ID1 = "&Session("id")

RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
%>
      </font> 
      <table width="100%" border="0" cellspacing="0" cellpadding="0">
        <%Do Until RecSet.EOF%>
        <%Addera2 = "Select * From members Where id = "&RecSet("ID2")
		RecSet2.Open Addera2, Connect2, adOpenStatic, adLockOptimistic
		%>
        <tr> 
          <td><font face="Verdana, Arial, Helvetica, sans-serif" size="1" color="#000000"> 
            <a href="delete_friend.asp?delID=<%=RecSet("id")%>" ><img src="delete-friend.gif" width="10" height="10" alt="Tabort fr&aring;n listan" border="0" align="absmiddle"></a><a href="send_mess.asp?toID=<%=RecSet("ID2")%>&direct=yes" target="mainFrame"><img src="send-mess.gif" align="absmiddle" alt="Skicka ett meddelande till <% =RecSet("namn")%>" border="0" width="10" height="10"></a><a href="whois.asp?checkid=<%=RecSet("ID2")%>" target="mainFrame"> 
            <%=RecSet("namn")%></a> 
            <%If RecSet2("status") = "offline" Then%>
            <b><font color="#FF0000"><</font></b> 
            <%Else%>
            <b><font color="#009966"><</font></b> 
            <%End If%>
            </font></td>
        </tr>
        <%
RecSet2.Close

RecSet.MoveNext
Loop
Connect2.Close
Set RecSet2 = nothing
Set Connect2 = nothing
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%>
      </table>
    </td>
  </tr>
</table>
</body>
</html>

LarsGMedlem sedan dec. 200012 464 inlägg

10 feb. 2002 14:19#2

Det går inte att lösa på något enkelt sätt eftersom du har tabellerna i olika databaser.

Det finns ingen anledning att ha relaterat data i flera databaser, det är bara nackdelar.

urbanMedlem sedan nov. 2001124 inlägg

10 feb. 2002 18:43#3

kan ingen hjälpa mig

LarsGMedlem sedan dec. 200012 464 inlägg

10 feb. 2002 18:52#4

Jo, om du lägger tabellerna i samma databas så.

urbanMedlem sedan nov. 2001124 inlägg

10 feb. 2002 19:13#5

men hur ska jag visa att han som jag har i kompislistan e online då?? det går ju inte

@ndersMedlem sedan juni 200032 967 inlägg

11 feb. 2002 05:54#6

Om du lägger tabellerna i samma databas går det jättebra.

Du förenklar nog ganska mycket i din applikation genom att lägga all relaterad data i samma databas.

Mvh,

Erik JuhlinMedlem sedan maj 200010 687 inlägg

11 feb. 2002 06:34#7

Det går väl att peka på de olika databaserna med Databas..Tabell. Eller är det bara med SQL Server man kan göra det..?

urbanMedlem sedan nov. 2001124 inlägg

11 feb. 2002 06:47#8

erik juhlin kan du visa kod??

@ndersMedlem sedan juni 200032 967 inlägg

11 feb. 2002 06:53#9

Erik, det går inte med Access.
Varje databas ligger i en egen databasfil och kräver en egen connection, därför kan du inte göra joins mellan olika databaser om du använder Access.

Mvh,