18 svar · 358 visningar · startad av qwerty
Har länge haft en gästbok som slutat att fungera ibland. Börjar bli trött på den och vill nu göra en i asp.
Ngn som har en färdig kod man kan bolla lite med och anpassa.
Jag ska göra en funktion som rensar bort könsord och svordomar. Kom gärna med tips om hur jag ska göra det också.
------------------
Qwerty
Den som söker han letar...
Kolla wf Script, finns två stycken gästböcker i ASP tror jag.. En är gjord av mig.. ;)
Sen den där funktionen (att filtrera bort svordomar & könsord) är ganska lätt att applicera till scriptet.. Sök i ASP-forumet så kommer du att hitta olika trådar om det där.. :)
------------------
Canis meus id comedit
Hej!
Jag laddade hem din gästbok och det fungerade aldeles utmärkt. Igår.
När jag satte på datorn idag och försökte gå in i gästboken kom ingenting fram. Efter att jag försökt gå in där kommer jag inte in i några andra asp-filer heller.
Om jag startar om datorn kommer jag in i andra asp-sidor igen, men så fort jag försökt gå in i gästboken är det stopp överallt sen.
vad kan detta bero på??
------------------
Qwerty
Den som söker han letar...
får du något felmeddelande?
------------------
<A HREF="http://cartman.nu" TARGET=_blank>
if i'm not back in five minutes, just wait longer.</A>
Nej, ingenting.
Den laddar helt enkelt inte in sidan.
...mycket skumt.
------------------
Qwerty
Den som söker han letar...
Man kommer så långt att man ser title men sen händer inget mer. Datorn bara står och tuggar.
Hjälp mig...
------------------
Qwerty
Den som söker han letar...
Du har inte lagt till någon loop eller?
Ifall du skriver
DO WHILE X < 10
Och sedan inte skriver
X = X + 1
så kommer den bara att tugga tugga tugga...
Bara en idé
------------------
"I have to return some video tapes" - Patrick Bateman, American Psycho
Ska kolla, men varför skulle jag isåfall inte komma in på någon av mina andra asp-sidor sen?
------------------
Qwerty
Den som söker han letar...
Så här ser det ut...
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\databas.mdb") & ";pwd=lˆsenordet;"
SQL = "SELECT * From Inlagg ORDER BY Id DESC"
rs.Open SQL, Conn, 1, 2
dim counted
counted = rs.RecordCount
%>
<center>
<h3 class="rubrik1">Diskutera mera</h3>
<table width="400" border="0" cellspacing="0" cellpadding="0" bgcolor="#CCCC99">
<tr>
<td>
<div align="center"><font face="verdana" size="1"><span class="lista">Det
finns för närvande</span><b><%=counted%></b>
<span class="lista">inlägg i Diskutera mera. </span></font></div>
</td>
</tr>
</table>
<p> </p>
</center>
<table width="300" border="0" align="center">
<% Do While Not rs.EOF %>
<tr>
<td> <font size="1"><span class="brodtext">Namn:</span> <a href=mailto:<%=rs("Email")%>><%=rs("Namn")%></a></font><br>
<font size="2"><b class="brodtext">Meddelande:</b><br>
<%=rs("Meddelande")%><br>
</font> <font size="1"><span class="brodtext">IP:</span>
<%=rs("IP")%></font><br>
<br>
<hr>
</td>
</tr>
<% rs.MoveNext %> <% Loop %>
</table>
<center>
<a href="add.asp">Skriv ett nytt inlägg</a>
</center>
<%
rs.Close
Conn.Close
%>
------------------
Qwerty
Den som söker han letar...
Fick igång det. Ngt med servern. Vet tyvärr inte vad problemet var.
------------------
Qwerty
Den som söker han letar...
Körde du gästboken via Microsoft Personal Webserver??
------------------
Mikael Tyrsén
</www.tyrsen.nu>
</mikael@tyrsen.nu>
Tänkte på en grej...
När jag laddade hem gästboken, lade jag den bara på servern och sen funkade den. Jag gjorde aldrig någon databaskoppling (ODBC). Behöver man inte göra det? Det trodde jag...
Kan detta ha ngt samband med att det hänger...? Nä det kan det väl inte va?
Trodde att jag hade kläm på det där med databaser när allting funkade perfekt. Sen dan efter kom man inte ens in...
...jag fattar typ nada.
...är det ingen som kan hjälpa mig.
------------------
Qwerty
Den som söker han letar...
För att
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db\databas.mdb") & ";pwd=lˆsenordet;"
är en "DSN-kod" eller vafan det nu heter.. ;)
Substitut för DSN alltså :)
------------------
Canis meus id comedit
Har oxå gjort en fin ( om man får säga det ) gästbok. Intresserad ?
kolla den på www.annelie.nu/guest.asp o hör av dej
------------------
/Annelie
Uppriktighet är inte att säga allt man tänker, utan mena allt man säger."
- Livius
[Redigerat av Annelie den 11 jan 2001]
Ja, det är klart att jag är intresserad (om du vill släppa koden dvs).
------------------
Qwerty
Den som söker han letar...
Har du inte testat den på webstudio den är väldigt bra tycker åtminstone jag.
------------------
Mvh Martin Persson
www.Costodia.com