---
title: "Mycket konstigt problem"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/68578-mycket-konstigt-problem"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Jeppez"
published: "2003-02-17T20:31:03.000Z"
updated: "2003-02-17T21:15:11.000Z"
replies: 6
views: 294
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/68578-mycket-konstigt-problem"
---

# Mycket konstigt problem

## #1 — Jeppez, 2003-02-17T20:31Z

Har problem med min community.
<http://213.64.229.211/wwwroot/default.asp>
använd: hm pw: hm
In o kolla... Klicka på "SÖK MUPPAR", väl vem som helst...
Längst ned under fliken "- meny -" finner ni Gästbok, håll musmakören över där.. ni ser att den delar ut ett ID. Klickar ni där ska ni få fram en vit sida? Varför blire så? Nån som har en aning? Gästboken fungerar juh liksom när man klickar på "Gästbok" i menyn....

/tacksam för svar

Permalänk: https://www.webforum.nu/p/68578

## #2 — Sebbe, 2003-02-17T20:33Z

Lite kod tack? :)

Permalänk: https://www.webforum.nu/p/953039

## #3 — solbulle, 2003-02-17T20:41Z

Som sagt, koden till read_gb.asp behövs.

Är det inte så att med det valet ser man sin egen gästbok, i menyn alltså?

Permalänk: https://www.webforum.nu/p/953044

## #4 — Jeppez, 2003-02-17T20:49Z

Koden för read_gb.asp kommer här:

\---------------------------------------------

\<!-- #include file="adovbs.inc" --\>
\<!-- #include file = "delaText.inc" --\>
\<% Session.LCID = 1053 %\>
\<%

If Request.Querystring("tillid")="" & Session("id") Then

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("db/gb.mdb")&";pwd=losen"

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

Addera = "Select \* From gb Where tillID = "&Request.QueryString("tillid") &" Order By Datum DESC"

RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

%\>

\<html\>
\<head\>
\<title\>\</title\>

\<style type="text/css"\>
body { 
scrollbar-base-color: #FFE784; 
scrollbar-arrow-color: #000000; 
scrollbar-highlight-color: #; 
scrollbar-3dlight-color: #000000; 
scrollbar-darkshadow-color: #000000; 
scrollbar-track-color: #FFE1A5  }
\</style\>
\<style type="text/css"\>
a:link { text-decoration: none}
a:visited { text-decoration: none}
a:active { text-decoration: none}
\</style\>

\<script language="JavaScript1.2"\>

function high(which2){
theobject=which2
highlighting=setInterval("highlightit(theobject)",50)
}
function low(which2){
clearInterval(highlighting)
which2.filters.alpha.opacity=75
}

function highlightit(cur2){
if (cur2.filters.alpha.opacity\<100)
cur2.filters.alpha.opacity+=5
else if (window.highlighting)
clearInterval(highlighting)
}

\</script\>
\<SCRIPT LANGUAGE="JavaScript"\>
function formCheck() 
{
        if (document.form1.text.value == "") 
        {
        alert("Skriv nått innan du skickar är du snäll");
        return false;
        }
}
\</SCRIPT\>
\<title\>\</title\>

\<script language="JavaScript1.2"\>

function high(which2){
theobject=which2
highlighting=setInterval("highlightit(theobject)",50)
}
function low(which2){
clearInterval(highlighting)
which2.filters.alpha.opacity=75
}

function highlightit(cur2){
if (cur2.filters.alpha.opacity\<100)
cur2.filters.alpha.opacity+=5
else if (window.highlighting)
clearInterval(highlighting)
}

\</script\>
\<SCRIPT LANGUAGE="JavaScript"\>
function formCheck() 
{
        if (document.form1.text.value == "") 
        {
        alert("Skriv nått innan du skickar är du snäll");
        return false;
        }
}
\</SCRIPT\>
\</head\>

\<body background="bg1.jpg" link="#333333" vlink="#333333" alink="#333333"\>\<% Session.LCID = 1053 %\>

\<table width="100%" height="100%" border="0" cellspacing="4" cellpadding="2"\>\<tr valign="top"\> 
\<td valign="top"\>
\<% Do Until RecSet.EOF %\>
\<table border="0" width="100%" cellspacing="1" cellpadding="0"\>\<tr\>
\<td height="10" width="100%" background="bg1ram.jpg"\>\<font face="Arial" size="1"\>\<b\>\<font color="#333333"\>\<a href="whois.asp?checkid=\<%=RecSet("Person_id")%\>" target="front"\>\<%=RecSet("namn")%\>\</a\> 
\<a href="read_gb.asp?tillid=\<%=RecSet("namn")%\>"\>Svara\</a\> \<a href="bort.asp?vad=tabort&id=\<%=RecSet("id")%\>"\>Tabort
  \</a\>\<%=RecSet("datum")%\>
  \</font\>\</b\>\</font\>
\</td\>\</tr\>\<tr valign="top"\>\<td width="100%"\>
\<table border="0" width="100%" cellspacing="0" cellpadding="2"\>\<tr\>\<td background="bg1.jpg"\>
\<font face="Arial" size="1"\>\<b\>\<font color="#333333"\>\<%=delaText(RecSet("text"))%\>
\</font\>\</b\>\</font\>
\</td\>\</tr\>\</table\>
\</td\>\</tr\>\</table\>\<font face="Arial" size="1" color="#333333"\>\<b\>\<br\>
        \<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing
%\>

\</b\>\</font\>

\</td\>\<td  width="165" align="right"\>
\<form name="form1" method="post" action="write_gb.asp?tillid=\<%=Request.QueryString("tillid")%\>" onSubmit="return formCheck()"\>
\<font face="Arial" size="1" color="#333333"\>\<b\>
\<input type="hidden" name="bild" value=""\>
\<textarea name="text" cols="30" rows="6" style="font-family: Arial; font-size: 10px; color: #333333; font-weight: bold"\>\</textarea\>
\</b\>\</font\>
\<div align="right"\>\<font face="Arial" size="1" color="#333333"\>\<b\>\<input type="submit" name="Submit" value="SKICKA!" style="font-family: Arial; font-size: 8pt; color: #333333; font-weight: bold"\>\</b\>\</font\>\</div\>
\</form\>\<font face="Arial" size="1" color="#333333"\>\<b\>\<br\>
\</b\>\</font\>
\</td\>

\</tr\>\</table\>

\</body\>
\</html\>

\<% Else

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "driver={Microsoft Access Driver (\*.mdb)};dbq=" & Server.MapPath("db/gb.mdb")&";pwd=losen"

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

Addera = "Select \* From gb Where tillID = "&Request.QueryString("tillid") &" Order By Datum DESC"

RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

%\>

\<% End If %\>

Permalänk: https://www.webforum.nu/p/953048

## #5 — Sebbe, 2003-02-17T20:56Z

Vad har egentlign Session("id") för värde? För om det inte har något värde blir det helt fel :)

Permalänk: https://www.webforum.nu/p/953055

## #6 — solbulle, 2003-02-17T21:01Z

Nja, den session har ju det värdet som man får som id vid inloggning.

If Request.Querystring("tillid")="" & Session("id") Then 

Den raden gör att man bara kan titta på sin egen gästbok.

Permalänk: https://www.webforum.nu/p/953058

## #7 — Jeppez, 2003-02-17T21:15Z

Tack så jävla mycket solbulle!
Problemet är löst!  §e

Permalänk: https://www.webforum.nu/p/953068

---

Tråden på webben: https://www.webforum.nu/amne/asp/68578-mycket-konstigt-problem
