Memo record return limit

[elitezorro]

Hi there looking for a lil help. Using ASP, VBScript, with an Access DB

<%
Dim rsBlog
Dim strSQLBlog
Set rsBlog = Server.CreateObject("ADODB.Recordset")
strSQLBlog = "SELECT * FROM Blog_Tbl ORDER BY ID DESC "
rsBlog.Open strSQLBlog, cn

Response.Write (rsBlog("Comments"))
rsBlog.Close
Set rsBlog = Nothing
%>

So I got this script which returns a memo record but I want to limit the lenght of the returned record. So if it's 1,000 words long or charcters it only returns the first 500 then I can have a link that takes to another page where it writes the whole thing as it does above.

Any help with this would mean a lot. I'm not finding anything.. Thanks

[PianoMan64]

Hi there looking for a lil help. Using ASP, VBScript, with an Access DB

<%
Dim rsBlog
Dim strSQLBlog
Set rsBlog = Server.CreateObject("ADODB.Recordset")
strSQLBlog = "SELECT * FROM Blog_Tbl ORDER BY ID DESC "
rsBlog.Open strSQLBlog, cn

Response.Write (rsBlog("Comments"))
rsBlog.Close
Set rsBlog = Nothing
%>

So I got this script which returns a memo record but I want to limit the lenght of the returned record. So if it's 1,000 words long or charcters it only returns the first 500 then I can have a link that takes to another page where it writes the whole thing as it does above.

Any help with this would mean a lot. I'm not finding anything.. Thanks

You would do the following:

<%
Dim rsBlog
Dim strSQLBlog  
Set rsBlog = Server.CreateObject("ADODB.Recordset") 
strSQLBlog = "SELECT * FROM Blog_Tbl ORDER BY ID DESC "
rsBlog.Open strSQLBlog, cn
 
Response.Write (Left(rsBlog("Comments")),500) & "..."
rsBlog.Close
Set rsBlog = Nothing
%>