摘要:
会员 信息 pagecount then page = pagecount end if if RS.EOF then%> 目前还没有任何信息! 请[点击这里]发布信息 0 then RS.AbsolutePage = page for i = 1 to PAGESIZE if RS.EOF then exit for... 阅读全文
摘要:
1. 屏蔽右键菜单 在菜单中单击"工程"->"引用",在列表中找到"Microsoft HTML Object Library"打上勾,按确定就可以了。 然后自己加上控件 Dim WithEvents M_Dom As MSHTML.HTMLDocument Private Function M_D 阅读全文