08. september 2003 - 13:47
Der er
11 kommentarer og
1 løsning
database viser ikke det hele
hej, nu har jeg så det problem at i min tagwall kan den
ikke skrive mere end en lille linie hvorfor ikke? hvordan kan det rettes =) min tagwall gemmer oplysninger ved at requeste et textarea som brugeren på siden før har indtastet hvordan laver jeg en funktion så den vil vise det hele ?
08. september 2003 - 13:52
#2
Hvilken properthy har dit felt i databasen. Det skal være en Note eller Notat (alt efter sprog), da den elles i nogle tilfælde kun vil gemme den første linie (før første break) ... Andre gange laver ASP-enginen fejl, så det er ikk sikkert det er den fejl....
Ellers kan du jo prøve at poste noget kode, så bliver det straks lettere for os at hjælpe dig..
/Anders
08. september 2003 - 14:01
#4
<textarea name="Tag" rows="5" cols="40" id="tekst"></textarea>
det er tag feltet
og koden der modtager den >
if session("admin") = True then
strSQL=strSQL & "'" & strAdmin1 & strTekst2 & strAdmin2 & "', "
else
strSQL=strSQL & "'" & strTekst2 & "', "
end if
hjalp det noget =) ?
08. september 2003 - 14:10
#7
du får bare hele lortet så :D
<form method="post" action="savetag.asp" name="post" onsubmit="return Check()">
<table width="400" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="70">Overskrift: </td>
<td width="173">
<input type="text" name="Overskrift" id="tekst">
</td>
<td width="24"> </td>
<td width="133"> </td>
</tr>
<tr>
<td width="70">Nickname: </td>
<td width="173">
<input type="text" name="Forfatter" id="tekst">
</td>
<td width="24">Email: </td>
<td width="133">
<input type="text" name="Email" id="tekst">
</td>
</tr>
</table>
<p>Tag:<br>
<textarea name="Tag" rows="5" cols="40" id="tekst"></textarea>
</p>
<input type="submit" value="gem!">
<input type=reset value="Slet Indhold">
</form>
det er hele formen der sendes til filen
<%
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
set rs = Server.CreateObject("ADODB.recordset")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("Tagwall.mdb")
Conn.Open DSN
strAdmin1 = "<font color=#CC0000>"
strAdmin2 = "</font>"
strTekst1 = Request.Form("Overskrift")
strTekst1 = Replace(strTekst1, "'", "''")
strTekst2 = Request.Form("Tag")
strTekst2 = Replace(strTekst2, "'", "''")
strTekst2 = Replace(strTekst2,VbCrLf,"<br>")
strTekst3 = Request.Form("Email")
strTekst3 = Replace(strTekst3, "'", "''")
strTekst4 = Request.Form("Forfatter")
strTekst4 = Replace(strTekst4, "'", "''")
if session("admin") = false then
strTekst1 = Replace(strTekst1, "Siden lukker", "siden lukker ikke")
strTekst1 = Replace(strTekst1, "siden lukker", "siden lukker ikke")
strTekst4 = Replace(strTekst4, "admin", "wannabee admin")
strTekst4 = Replace(strTekst4, "Admin", "wannabee admin")
strTekst4 = Replace(strTekst4, "Ejer", "wannabee admin")
strTekst4 = Replace(strTekst4, "ejer", "wannabee admin")
strTekst4 = Replace(strTekst4, "Koma", "wannabee admin")
strTekst4 = Replace(strTekst4, "koma", "wannabee admin")
strTekst4 = Replace(strTekst4, "Kragen", "wannabee admin")
strTekst4 = Replace(strTekst4, "kragen", "wannabee admin")
strTekst4 = Replace(strTekst4, "Arez", "wannabee admin")
strTekst4 = Replace(strTekst4, "arez", "wannabee admin")
end if
' SQL sætning opbygges
strSQL="Insert into tags (Skriver, Overskrift,"
strSQL=strSQL & "Tag, Email, Dato, Ip)"
strSQL=strSQL & "values "
strSQL=strSQL & "('" & strTekst4 & "', "
strSQL=strSQL & "'" & strTekst1 & "', "
if session("admin") = True then
strSQL=strSQL & "'" & strAdmin1 & strTekst2 & strAdmin2 & "', "
else
strSQL=strSQL & "'" & strTekst2 & "', "
end if
strSQL=strSQL & "'" & strTekst3 & "', "
strSQL=strSQL & "#"&Now()&"#, "
strSQL=strSQL & "'" & Request.ServerVariables("REMOTE_ADDR") & "')"
' SQL sætning eksekveres
rs.Open strSQL, conn
' Luk databaseforbindelse
'Conn.Close
'Set Conn = Nothing
%>
<%
Response.Write "tag oprettet tak for din besked, <a href='setag.asp'>se tagwall</a>"
%>
det er hele gem tag systemet... en anden udnerlig ting er at når jeg skriver som admin "nu skriver admins med rødt... tror jeg" så lugger det der skriv rødt tag ikke så bliver hele resten af teksten rød !?!?