der er noget galt med min brugerliste

hvad for en http error?

har du slået friendly http error messages fra i internet options / advanced fanen?

det er en internal server error, 500

Microsoft VBScript compilation error '800a0400'

Expected statement

/dating/userview.asp, line 14

<MM:BeginLock translatorClass="MM_SSI" type="ssi_include" depFiles="conn.asp" orig="%3C!--#include file=%22conn.asp%22--%3E" ><%

efter jeg havde slået det fra

den ser da også mærkelig ud den include file

Microsoft JET Database Engine error '80040e10'

No value given for one or more required parameters.

/dating/userview.asp, line 34

her er den kode der er nu

<%
Option Explicit
Dim sql,newcount,rsUsers,rsUser,username,sex,lookfor, startletter,alphabet

username = Request.Cookies("username")
startletter = Request.QueryString("startletter")

'Example of protecting a page for members only
if username = "" then
  Response.Redirect("nologin.asp?page=userview.asp")
end if

'If no letter has been clicked (this is 1st visit), start displaying at letter A
if startletter = "" then
  startletter = "A"
end if

%>
<!--#include file="conn.asp"-->
<%

'If 123 option is chosen, pick all records that don't start with a letter (this makes a BIG sql string)
if startletter = "nonalphabet" then
  sql = "SELECT username, sex, lookfor, icon FROM users WHERE username Not Like 'a%'"
  for alphabet = 98 to 122
    sql = sql & " AND username Not Like '" & chr(alphabet) & "%'"
  next
  sql = sql & " ORDER BY username"
'Otherwise just get the users that start with the chosen letter
else
  sql = "SELECT username, sex, lookfor, icon FROM users WHERE username Like '" & startletter & "%' ORDER BY username"
end if
Set rsUsers = Server.CreateObject("ADODB.Recordset")
rsUsers.Open sql, conn, 3, 3

sql = "SELECT icon, sex, lookfor FROM Users WHERE username = '" & username & "'"
Set rsUser = Server.CreateObject("ADODB.Recordset")
rsUser.Open sql, conn, 3, 3
%>
<HTML>

<HEAD>
  <TITLE></TITLE>

<META name="description" content="">
<META name="keywords" content="">
<META name="robots" content="index, follow">
<META name="revisit" content="7 days">

<style type="text/css">
<!--

    A:link {text-decoration: none;}
    A:visited {text-decoration: none;}
    A:hover {text-decoration: underline;}

-->
</style>

</HEAD>

<BODY BGCOLOR="FFFFFF" TEXT="000000" LINK="FF8000" VLINK="FF8000" Marginwidth=0 marginheight=0 leftmargin=0 topmargin=0>
<div align="center">
  <TABLE BORDER=0 CELLPADDING=0 CELLSPACING=0>
    <TR>
      <TD VALIGN=top height="486"> </TD>
      <TD VALIGN=top height="486">
        <p align="center"><BR>
        <table align="center" border="0" width="654">
          <tr>
            <td width="648" height="388" style="border-color:black; border-top-style:solid; border-right-style:none; border-bottom-style:none; border-left-style:solid;">
              <p align="center" style="line-height:100%; margin-top:0; margin-bottom:0;">&nbsp;&nbsp;
              <p>&nbsp;</p>
              <p align="center">&nbsp;</p>
              <!-- Displays A-Z -->
              <table cellpadding="2" cellspacing="0" border="1" bordercolor="#B4B4B4" width="638" align="center">
                <tr>
                  <td align="center" bgcolor="black" width="384"><a href="userview.asp?startletter=nonalphabet"><b><font face="Arial,helvetica" size="2" color="white">123</font></b></a><font color="white" size="2" face="Arial"><b>
                    <%'Loop through alphabet (chars 65 to 90 are A-Z)
for alphabet = 65 to 90%>
                    </b></font></td>
                  <td align="center" bgcolor="black" width="240"><font color="white" size="2" face="Arial"><b>&nbsp;</b></font><a href="file:///D|/Bastiano/dating/userview.asp?startletter=<%=chr(alphabet)%>"><b><font face="Arial,helvetica" size="2" color="white"><%=chr(alphabet)%></font></b></a></td>
                  <%next%>
                </tr>
              </table>
              <%if not rsUsers.EOF then%>
              <!-- Displays users -->
              <table cellpadding="2" cellspacing="0" border="1" bordercolor="#B4B4B4" width="639" align="center">
                <tr bgcolor="#B4B4B4">
                  <th width="95" height="25" bgcolor="black">
                    <p align="center"><font face="Arial,helvetica" size="2" color="white"><b>Brugernavn</b></font>
                  </th>
                  <th width="82" height="25" bgcolor="black">
                    <p align="center"><font color="white" size="2" face="Arial"><b>Alder</b></font></p>
                  </th>
                  <th width="136" height="25" bgcolor="black">
                    <p align="center"><font face="Arial,helvetica" size="2" color="white"><b>Icon</b></font>
                  </th>
                  <th width="167" height="25" bgcolor="black">
                    <p align="center"><font face="Arial,helvetica" size="2" color="white"><b>Kontakt</b></font>
                  </th>
                </tr>
                <%rsUsers.Movefirst
  do until rsUsers.EOF%>
                <tr>
                  <td width="95" height="36"><font color="black"><b>&nbsp;</b></font><a href="show_profil.asp?user=<%=rsUsers("username")%>"><font face="arial,helvetica" size="2" color="black"><b><%=rsUsers("username")%>
                    </b></font></a></td>
                  <td width="82" height="36">
                    <p align="center"><font color="black"><b><%=rsUsers("Age")%></b></font></p>
                  </td>
                  <td align="center" width="136" height="36"><font color="black"><b><img src="icons/<%=rsUsers("icon")%>_small.gif" width="20" height="20"></b></font></td>
                  <td align="center" width="167" height="36"><a href="messagecompose.asp?senduser=<%=rsUsers("username")%>"><font face="arial,helvetica" size="1" color="black"><b><img src="file:///D|/Bastiano/dating/icons/envelope.gif" alt="send a message to <%=rsUsers("username")%>" border=0 hspace="10">send
                    besked</b></font></a></td>
                </tr>
                <%rsUsers.Movenext
  loop%>
              </table>
              <%'If no users, give a message
else%>
              <p align="center"><font face="arial,helvetica" size=2 color="white"><b>Der
                er ikke nogen der starter med <%=startletter%>.</b></font></p>
              <%end if%>
              <font face="arial,helvetica" size=2 color="white"><b><br>
              </b></font>
              <p align="center"><a href="index.asp"><font face="arial,helvetica" size=2 color="white"><b>Tilbage
                til forsiden</b></font></a></p>
            </td>
          </tr>
        </table>
        <p align="left">&nbsp;</p>
      </TD>
    </TR>
  </TABLE>
</div>
<p>&nbsp;</p>
</BODY>
</HTML>
<%
rsUsers.close
set rsUsers = nothing
rsUser.close
set rsUser = nothing
conn.close
set conn = nothing
%>

ok jeg nærmer mig nu...kommer igen om lidt med en anden fejl:o)..slettede rsuser-linjerne og nu er der lidt hul igennem.

damn det skulle jeg ikke have gjort..se www.bastiano.dk/dating/userview.asp

Den siger den mangler en endelse her?..dette er endelsen i min asp-kode

<%
rsUsers.close
set rsUsers = nothing
rsUser.close
set rsUser = nothing
conn.close
set conn = nothing
%>

hjææææææælp

<%if not rsUsers.EOF then%>
hvad er objectet hertil? den siger det mangler

Har du et bruger navn / password vi kan bruge til test?
Det er nok rsUsers den har bøvl med du har "Option Explicit" i toppen så du skal hvade defineret alle dine obejcter.
Denne linie fortæller at rsUsers er et recordset object så det skulle være godt nok:
Set rsUser = Server.CreateObject("ADODB.Recordset")

Har du lukket for Recordsetet før du laver rsUsers.EOF på det?

det er sikkert nogle macromedia extensions, er det ikke?

er de også installeret på serveren?

yay... hvorfor står min kommentar så langt nede? jeg skrev den jo helt i starten af debatten her!! 8-|

jamen koden ser ud som den gør sidst jeg skrev den..altså den lange smøre. Jeg har defineret objekterne men den siger altså fejl i enten "end"  som jeg skrev.

Ja jeg bruger ultradev, men alle mine andre sider virker da fint. Login ligger på www.bastiano.dk/dating. Man kan oprette sig, skrive mails, men ikke se den forbandede brugerliste og uploade billeder..

der er måske en fejl i din sql streng...

SELECT username, sex, lookfor, icon FROM users WHERE username Like '" & startletter & "%' ORDER BY username

er username, sex, lookfor eller icon evt. stavet forkert i forhold til i tabellen??

Jeg har lige prøvet at klippe din kode ind i en fil på min PC. Den virker fint dog udskriver du rsUSers("Age") i en linie og den ingår ikke i SQL sætningen.......: "SELECT username, sex,...., Age FROM ...;"

Den eneste forskel er at jeg ikke har en include fil som åbner en connection til databasen, så hvad sker der i include filen?

Får du en fejl meddelselse?

jeg har slettet de ting, de skulle ikke med i selve søgningen og er ikke med i databasen. de andre filer virker fint med inc.-filen. jeg prøver lige at rette.

Microsoft VBScript runtime error '800a01f4'

Variable is undefined: 'strSQL'

/dating/userview.asp, line 18

nu ser userview således ud:

<%
Option Explicit
Dim sql,newcount,rsUsers,rsUser,username, Icq,age,email,startletter,alphabet

username = Request.Cookies("username")
startletter = Request.QueryString("startletter")

'Example of protecting a page for members only
if username = "" then
  Response.Redirect("nologin.asp?page=userview.asp")
end if


%>
<!--#include file="conn.asp"-->
<%
    Set rsUsers = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT * FROM users"
    rsUsers.Open strSQL, myConn, 1, 3
   
   
   
    Set rsUser = Server.CreateObject("ADODB.RecordSet")
    strSQL = "SELECT SUM(thempoints) AS Points2 FROM Played_War"
    rsUsers.Open strSQL, myConn, 1, 3
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link href="../source279/style1.css" type="text/css" rel="stylesheet">
<title>COBO</title>
</head>

<body vLink="#C0C0C0" aLink="#C0C0C0" link="#C0C0C0" bgColor="#333333" text="#FFFFFF">

<p align="center">

<p align="center"><b><font size="3">COBO</font></b></p>
<div align="center">
  <center>
    <table border="0" cellpadding="3" cellspacing="1" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber2" width="90%" bgcolor="#000000">
      <tr>
        <td colspan="6">&nbsp;</td>
      </tr>
      <tr>
        <td background="../source279/images/back2.gif">&nbsp;</td>
        <td background="../source279/images/back2.gif"><b><font size="2" face="Verdana">Brugernavn</font></b></td>
        <td background="../source279/images/back2.gif"><font size="2" face="Verdana"><b>email</b></font></td>
        <td background="../source279/images/back2.gif"><b><font size="2" face="Verdana">Age</font></b></td>
        <td background="../source279/images/back2.gif"><b><font size="2" face="Verdana">Icq</font></b></td>
        <td background="../source279/images/back2.gif"><strong><font size="2" face="Verdana">Mail</font></strong></td>
      </tr>
      <% Do While Not rs.EOF %>
      <tr>
        <td background="../source279/images/back.gif">&nbsp;</td>
        <td background="../source279/images/back.gif"><font size="2"><%=RS("username")%></font></td>
        <td background="../source279/images/back.gif"><font size="2"><%=RS("email")%></font></td>
        <td background="../source279/images/back.gif"><font size="2"><b><%=RS("age")%></b>
          </font></td>
        <td background="../source279/images/back.gif"><font size="2"><%=RS4("Icq")%></font></td>
        <%rs.Movenext
    Loop   
%>
      </tr>
    </table>
  <p><br>
  <br>
  </p>
  </center>
</div>
<div align="center">
  <center>
  </center>
</div>
<p><br>
</p>
<div align="center">
  <center>
  </center>
</div>

</html>
<%
myConn.Close
Set myConn = Nothing
%>

Alle variable skal Dim'es, tilføj:

DIM strSQL

Fik du det til at virke..?

>> babyshark - har du fået styr på 'translatorClass' fra Dreamweaver.

jeg har netop fået samme 'translatorClass' kode udfor min includefil og browseren har svært ved at oversætte koden - 1. ste gang - 2. gang går det bedre. Koden bliver tilsyneladende sat ind, når man gemmer en
server include inde mellem to <%%>. Jeg arbejder på at få en løsning.

Ping mig, hvis dit problem er persistent

henrik

A har fundet fejlen og løsningen med 'translatorClass'. Ded er en bug i DW MX. Ded du ser er en intern oversætterinstruks fra MX.

Løsning:
blabla kode%>
<!--
<!--#include file="inc/include.inc" -->
//-->
<%blabla kode

Henrik