1.asp�����ŷ���Դ��
2.显示新闻标题的简简单ASP源码为<%=title%>,title是数据库字段名,请问怎么控制显示标题字数
asp�����ŷ���Դ��
第一个:
<tr>
<td colspan="2" align="left" valign="top" class="c">留言内容:<p><%=rs("connet")%></td>
</tr>
<tr>
<td colspan="2" align="left" valign="top" class="c" height="">
..............<a href="del.asp?id=<%=rs("id")%>" style="text-decoration: none"><font color="#">删除</font></a>.................<a href="reg.asp" style="text-decoration: none"><font color="#">我要留言</font></a>.........</td>
</tr>
把上面的改成
<tr>
<td colspan="3" align="left" valign="top" class="c">留言内容:<p><%=rs("connet")%></td>
</tr>
<tr>
<td colspan="3" align="left" valign="top" class="c" height="">
..............<a href="del.asp?id=<%=rs("id")%>" style="text-decoration: none"><font color="#">删除</font></a>.................<a href="reg.asp" style="text-decoration: none"><font color="#">我要留言</font></a>.........</td>
</tr>
第二个:
<!--header begin-->
<%
response.write "<div id=mainbox>"&_
"<table border=0 width=% cellpadding=4 style=border-collapse: collapse class='top_table'>"&_
"<form name=form action=Product_ListSearch.asp method=get>"&_
" <tr><td colspan=2 height=5></td></tr>"&_
" <tr>"&_
" <td><a href=index.asp title=返回首页><img src=uploadpic/></a></td>"&_
" <td align=right>"&_
" <table><tr><td class=cartimg></td><td><a href=Cart_List.asp>查看我的购物车</a>(<font color=#FF>"
if session("y")="" then response.write "0" else response.write session("y")
===================================
response.write "<td><a href=index.asp title=返回首页><object classid='clsid:DCDB6E-AE6D-cf-B8-' codebase='/pub/shockwave/cabs/flash/swflash.cab#version=6,0,,0' width='' height=''>"&_
"<param name='movie' value='logo.swf'>"&_
"<param name='quality' value='high'>"&_
"<embed src='logo.swf' width='' height='' quality='high' type='application/x-shockwave-flash' width='' height=''></embed></object></a></td>"
%>
希望我的回答对你有所帮助。
显示新闻标题的单新最新源源码ASP源码为<%=title%>,title是数据库字段名,请问怎么控制显示标题字数
可以编一个函数来控制
//PreTitle为原始标题,LimitNumber为限制数量
Function getTitle(PreTitle,布源小额放贷系统源码LimitNumber)
if len(PreTitle)<=LimitNumber then
getTitle=PreTitle
else
getTitle=left(PreTitle,LimitNumber)&"...."
end if
End Function
使用的时候显示<%=getTitle(rs("title"))%>就行了