以下是引用dzlst在2006-11-9 10:20:36的发言:乖宝宝,如何在下面的列出文章栏目函数中,在头部的右边加上一个小图片,然后再指向栏目ID呢:
TempStr = TempStr & "<TD WIDTH=""" & CInt(100 / CInt(ColNumber)) & "%"" HEIGHT=""150"" VALIGN=""top"">" & vbCrLf
TempStr = TempStr & "<table height=""100%"" width=""100%"" border=""0"" align=""center"" cellPadding=""0"" cellSpacing=""0"">" & vbCrLf
TempStr = TempStr & "<tr><td style=""height: 25;border-top: 1px solid #d2d3d9;border-left: 1px solid #d2d3d9;border-right: 1px solid #d2d3d9;padding-left:30;""" & MenuBgStr & "><strong>"
TempStr = TempStr & KSCMS.GetFolderNameAndLink(ID, OpenTypeStr, FolderCss) & "</strong></td></tr>" & vbCrLf
TempStr = TempStr & "<tr><td style=""border: 1px solid #D2D3D9;line-height: 150%;text-align: left;padding-left:5;padding-right:5;"" vAlign=""top"">" & vbCrLf
TempStr = TempStr & KSCMS.GetFolderNameAndLink(ID, OpenTypeStr, FolderCss) & "</strong></td></tr>" & vbCrLf
这里面加
TempStr = TempStr & "<img src='你的图片地址' border='0'>" & KSCMS.GetFolderNameAndLink(ID, OpenTypeStr, FolderCss) & "</strong></td></tr>" & vbCrLf