2012年11月19日

ASP GetXML
摘要： Function GetXml(Xml_Url)GetXml_Temp =""Dim objXml'On Error Resume NextSet objXml = Server.CreateObject("Msxml2.ServerXMLHTTP")objXml.SetTimeOuts 10000, 10000, 30000, 30000objXml.Open "GET",Xml_Url,FalseobjXml.Send()If (objXml.ReadyState = 4) And (objXml.Status = 200 阅读全文
posted @ 2012-11-19 14:06 canny_strive 阅读(154) 评论(0) 推荐(0)
ASP 正则表达式
摘要： memailbody = RegReplace("<rplmsg>(.|\n)*?</rplmsg>",memailbody,"<div align=left>"&Trim(request("content"))&"</div>" )Function RegReplace2(stPattern,stString,stReplace)RegReplace= stString Dim regEx, Match, Matches Set regEx =New 阅读全文
posted @ 2012-11-19 14:02 canny_strive 阅读(121) 评论(0) 推荐(0)

导航