HAIRUICMS函数列表HAIRUICMS

/ / 2016-01-30 阅读：2559

Function RemoveHTML(strHTML) '作用：完全去除HTML标记 '参数：strHTML：要过滤的字符串 Function FormatTime(s_Time, n_Flag) '...

Function RemoveHTML(strHTML)

'作用：完全去除HTML标记

'参数：strHTML：要过滤的字符串

Function FormatTime(s_Time, n_Flag)

'作用：格式化时间(显示)。

'参数：s_Time：要格式化的时间

' n_Flag：格式化以后的显示形式，有以下几种：

' 1:"yyyy-mm-dd hh:mm:ss"

' 2:"yyyy-mm-dd"

' 3:"hh:mm:ss"

' 4:"yyyy年mm月dd日"

' 5:"yyyymmdd"

' 6:"yyyymmddhhmmss"

' 7:"yyyymmddhhmm"

' 8:"mm月dd日

' 9:dd日

Function ChangeTypeCN(par_content)

'作用：中文与数字相互转换

'参数：par_content：要转换的中文或数字

Function OutputMulLineText(MulLineText)

'作用：输出多行文本

'参数：MulLineText：要输出的文本内容

Function GetLocationURL()

'作用：获取当前页面地址(包括参数)

Function Get_ImgSrc(ByVal t0)

'作用：获取内容中所有图片

'参数：t0：内容

Function Frist_Pic(ByVal t0)

'作用：获取内容中第一个图片

'参数：t0：内容

Function FixString(ByVal strWord, ByVal NumByte, ByVal NumDot)

'作用：按字节截取字符串

'参数：strWord:需要截取的字符串

' numByte:整数，截取的总长度

' numDot:整数，如果被截取是否以“.”结尾，0为不需要，其他数值为“.”的个数

Function AllChildSort(Cuz,SortID)

'作用：查询出指定栏目的所有子栏目ID（包含当前栏目）

'参数：Cuz:模块名

' SortID:栏目ID

Function NextChildSort(Cuz,SortID)

'作用：查询出下一级子栏目ID

'参数：Cuz:模块名

' SortID:栏目ID

Function GetSortInfo(Cuz,SortID,FieldName)

'作用：查询栏目相关信息

'参数：Cuz:类型

' SortID:栏目ID

' FieldName:栏目字段名

Function Read(ItemID,FieldName)

'作用：调用单页信息

'参数：ItemID：单页ID

' FieldName：要查询的字段

Function Block(ItemID)

'作用：调用文本块内容

'参数：ItemID：文本块ID

Function CommonList(Cuz,SortID,Num,TitleLen,Prefix,PrefixWidth,IsTime,TimeColor)

'作用：通用信息列表

'参数：Cuz：所属模块

' SortID：所属栏目ID，"0"表示所有栏目，"[1,2]"表示多个栏目

' Num：输出数量

' TitleLen：标题长度

' Prefix：标题前缀

' PrefixWidth：标题前缀宽度

' IsTime：是否显示时间，0—不显示，1—显示

' TimeColor：时间显示颜色

Function HotList(Cuz,SortID,Num,TrimStr,fImg,fImgWidth)

'作用：点击排行

Function ComdList(Cuz,SortID,Num,TrimStr,fImg,fImgWidth)

'作用：推荐列表

Function JobList(Cuz,SortID,Num,TrimStr,fImg,fImgWidth)

'作用：招聘调用

Function CuzListProduct(Cuz,SortID,Num,TrimStr,ImgWidth,ImgHeight)

'作用：产品调用

Function ListSort(Cuz,SortID)

'作用：分类导航

'参数：Cuz:模块名称

SortID:栏目ID

Function FlinkIndex(Num)

'作用：调用友情链接

'参数：Num:友情链接数量

Function NoticeList(Num,TrimStr,fImg,fImgWidth)

'作用：调用网站公告

Function MemberLogin()

'作用：显示会员登录

Sub Flash(Num,fWidht,fHeight,tHeight)

'作用：文章幻灯片显示

'参数：Num:幻灯片数量

fWidht:幻灯片宽度

fHeight:幻灯片高度

tHeight:幻灯片文字高度

Function sFlash(Num,fWidht,fHeight,tHeight)

'作用：单页幻灯片显示

'参数：Num:幻灯片数量

fWidht:幻灯片宽度

fHeight:幻灯片高度

tHeight:幻灯片文字高度

Function ShowNav(Num)

'作用：输出导航

'参数：Num:导航数量

上一篇：没有了

下一篇：栏目列表页获取当前栏目信息

阅读延展

HAIRUICMS函数列表HAIRUICMS

我要评论

最新评论