<% 'Response.Buffer = True 'Response.Expires = -1 'Response.ExpiresAbsolute = Now() - 1 'Response.Expires = 0 'Response.CacheControl = "no-cache" session("hidd_key")="" Function gen_key(xx) dim char_array(35) char_array(0) = "0" char_array(1) = "1" char_array(2) = "2" char_array(3) = "3" char_array(4) = "4" char_array(5) = "5" char_array(6) = "6" char_array(7) = "7" char_array(8) = "8" char_array(9) = "9" char_array(10) = "A" char_array(11) = "B" char_array(12) = "C" char_array(13) = "D" char_array(14) = "E" char_array(15) = "F" char_array(16) = "G" char_array(17) = "H" char_array(18) = "I" char_array(19) = "J" char_array(20) = "K" char_array(21) = "L" char_array(22) = "M" char_array(23) = "N" char_array(24) = "O" char_array(25) = "P" char_array(26) = "Q" char_array(27) = "R" char_array(28) = "S" char_array(29) = "T" char_array(30) = "U" char_array(31) = "V" char_array(32) = "W" char_array(33) = "X" char_array(34) = "Y" char_array(35) = "Z" randomize for i=1 to xx num = char_array(Int(35 * Rnd + 0)) output = output + num next gen_key = output End Function key=gen_key(5) session("hidd_key")=key response.write key response.end %> bigtrends

安全代码<%=key%>          请输入一遍左边的安全代码

姓名: *如:王先生  手机: email:
电话: *请输入区号 方便接听时段: 随时 上午12点前 下午6点前 晚9点前 公休日
地址: 国家: 城市名: 州名: 邮编:
你所持有的股票: 股票1 股票2: 股票3:
(请您务必留下真实的联系方式,我们的工作人员在收到您的信息后,将尽快与您取得联系。)