jeg kan kun skrive 255 tegn ?
hej alle mit problem er at man ikke kan skrive mere end 255 tegn i besked feldtet.kan i løse det for mig ?
min kode ser sådan her ud
<%
Response.Buffer = True
'Åbner forbindelse til databsen
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("wall.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
sql = "select * from wall order by id desc"
rs.Open sql, conn, 1, 3
%>
<html>
<head>
<title>ASP Tagwall</title>
</head>
</head>
<body align="center">
<br />
<table border="0" width="600" height="1" cellspacing="0" cellpadding="0" style="border: 1 solid #000000" bgcolor="#FFFFFF" align="center">
<tr>
<td align="center">
<table border="0" align="center" width="399">
<form method="post" action="default.asp" id=form1 name=form1>
<tr><td colspan="2"><center>
<%
'Hvis brugeren har submittet formen
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
'Smider værdierne ned i variabler
navn = Request("navn")
tag = Request("tag")
'Tjecker om navn og tag er udfyldt
if navn = "" then
Response.Write("Udfyld dit navn<br />")
end if
if tag = "" then
Response.Write("Udfyld et tag<br />")
end if
'Tilføjer til databasen hvis navn og tag er udfyldt
if navn <> "" AND tag <> "" then
rs.AddNew
rs("navn") = navn
rs("tag") = tag
rs("dato") = Now()
rs.update
'Opdaterer vinduet
Response.Redirect("default.asp")
end if
end if %>
</center></td></tr>
<tr>
<td>Navn</td>
<td><input autocomplete="no" type="text" name="navn" value="<%=Request("navn")%>"></td>
</tr>
<tr>
<td valign="top">Kommentar</td>
<td><textarea rows="5" cols="44" name="tag"><%=Request("tag")%></textarea>
</tr>
<tr>
<td></td>
<td><input type="submit" value="Send"></td>
</tr>
</form>
</table>
<hr color="#000000" size="1" width="100%">
</td>
</Tr>
<tr>
<td align="center">
<%
'Hvis der ingen tags er
if rs.eof or rs.bof then
%>
Ingen kommentar
<% else
'Lopper alle tags igennem med en løkke
Do until rs.eof
navn = rs("navn")
tag = rs("tag")
%>
<%=navn%>: <%=tag%><br />
<% rs.movenext
loop
end if %>
</td>
</tr>
</table>
</body>
</html>
<%
'Lukker recordset
rs.close
set rs = nothing
'Lukker connection
conn.close
set conn = nothing
%>
