text<-getURL(paste(sep="","www.szse.cn/szseWeb/FrontController.szse?randnum=",as.character(runif(1)),"&ACTIONID=7&AJAX=AJAX-TRUE&CATALOGID=1743_nm&TABKEY=tab1&tab1PAGECOUNT=49&tab1RECORDCOUNT=484&REPORT_ACTION=navigate&tab1PAGENUM=3"),.encoding = "utf-8")
iconv(text,"GBK","utf-8")