写的很简单，只是实现了功能<%Function formaturl(yes) If mid(yes,5,1)<>"" then yes1 = left(yes,3) yes2 = right(yes,cint(len(yes))-3) formaturl = yes1 & "." & yes2 else formaturl=yes end ifEnd&n...