<%
'商易仿淘宝4.0(多用户)
'ACCESS版演示网站：http://www.ftaobao.com(商易仿淘宝商城)
'SQL版演示网站：http://sql.ftaobao.com
'电话：0571-56907100
'QQ：1147100
%>
<%Function  xinyongdian()
xinyong = conn.execute("select xinyong from huiyuan where huiyuan='"&myhuiyuan&"'")(0)
	
		If xinyong<10 Then
		xing="noxing.gif"
		End if
		If xinyong>10 Then
		xing="xing1.gif"
		alt="10-35为一星级"
		End if
		If xinyong>35 Then
		xing="xing2.gif"
		alt="35-90为二星级"
		End If
		
		If xinyong>100 Then
		xing="xing3.gif"
		alt="100-200为三星级"
		End if
		If xinyong>200 Then
		xing="xing4.gif"
		alt="200-450为四星级"
		End If
		
		If xinyong>500 Then
		xing="xing5.gif"
		alt="500-900为五星级"
		End If
		
		If xinyong>900 Then
		xing="xing6.gif"
		alt="1000-1800为六星级"
		End If
		
		If xinyong>1800 Then
		xing="xing7.gif"
		alt="1800-3000为七星级"
		End If
        If  xinyong>3000 Then
		xing="xing8.gif"
		alt="3000以上为八星级"
		End if

End Function%>