2005年3月7日

摘要: 有时候需要将文字变成Unicode 转义序列 Js版 vbs版 Function Unicode(str1) Dim str,temp str = "" For i=1 to len(str1) temp = Hex(AscW(Mid(str1,i,1))) If len(temp) < 5 Then temp = right("0000" & temp, 4) str = str... 阅读全文
posted @ 2005-03-07 22:41 中国Rainbow 阅读(1274) 评论(0) 推荐(0) 编辑
 
摘要: 代码如下 FileReader reader = new FileReader("D:\\lbhdev\\feisanWeb\\src\\265_url.txt"); BufferedReader br = new BufferedReader(reader); String s1 = null; while((s1 = br.readLine()) != null) { } br.cl... 阅读全文
posted @ 2005-03-07 22:38 中国Rainbow 阅读(20327) 评论(1) 推荐(0) 编辑