指点下 asp自定函数的困惑 明白人 给指点下 穷的没分了！！有分了再散吧！！

[zjzb0409]

在网站过程中 经常会碰到一些函数 前几天在社区里 一大侠 跟我提到了 带返回值的函数 还有好像是过程函数 请给我写几个简单的函数 带返回值 和不带返回值的！！ 最好是 例如 新闻类型
rs.open "select top 8 * from table where type='公司新闻' order by newsid desc",conn,1,1
rs.open "select top 8 * from table where type='行业新闻' order by newsid desc",conn,1,1

等等 语句都是一样的 就是显示的类型不同 这种 情况下 我就得就可以通过一个函数 来实现 这样少打不少代码 但是不会写

所以需求一个 建立数据库查询的asp 自定义函数 请 懂的大侠 赐教！！！！！！！！ 随便举几个例子 给我讲讲 太迷糊了

[zjzb0409]

我说的大侠 就是你 你又给我回复了 哈哈 学习了。

[Atai-Lu]

'//带返回值的
function getLinkList(num)
	set getLinkList=conn.execute("select top " & num & " * from [link] order by Id asc")
end function
'//不带返回值的,一般用过程
Sub errMsg(message)'//信息提示
	Response.Write "<script language='javascript'>alert('"&message&"');history.go(-1);</script>"
	Response.End()
End Sub

[Atai-Lu]

'//不带返回值的,这样也可以
Function errMsg(message)'//信息提示
    Response.Write "<script language='javascript'>alert('"&message&"');history.go(-1);</script>"
    Response.End()
End Function