% Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open ConnStr Set Rs = Server.CreateObject("ADODB.Recordset") SQL = "Select * from tb_product where uid=" & clng(Request.QueryString("uid")) Rs.Open SQL,Conn,1,3 Select Case Rs("serial") Case "TV¹CÀ¸¾÷" strTitle = "game1.gif" Case "LED¹CÀ¸¾÷" strTitle = "game2.gif" Case "TVÄå®ç¹CÀ¸¾÷¨t¦C" strTitle = "game3.gif" Case "¾ë§J¹CÀ¸¾÷¨t¦C" strTitle = "game4.gif" Case "·n·n¼Ö¾÷±ñ¹CÀ¸¾÷" strTitle = "game5.gif" Case "¹qª±¹s²Õ¥ó" strTitle = "game6.gif" Case "¹q¸£¶gÃä" strTitle = "game7.gif" Case "¨ä¥L²£«~" strTitle = "game8.gif" Case "³Ì·s²£«~" strTitle = "game9.gif" End Select %>