写的很简单，只是实现了功能<%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...

网站地址：http://www.leapfish.com/--------以下是网络上对域名价值评估的一些方法-------------------域名的价值是一个很抽象的概念，为了正确评估客户的域名价值，我们借鉴国际 上的做法，并结合中国的国情提出以下评估模式： 域名的价值可以由以下几个方面来评估： 1、域名的长度 域名长度（不包括后缀名）的重要性是不容质疑的，短的域名不仅易记，而且输 入方便，不易出错。我们可以根据域名的长度将域名分为以下几级： A级：域名长度小于5，如aaa等。 B级：域名长度在6-10之间，如amaz...

<% host=lcase(request.servervariables("HTTP_HOST")) SELECT CASE host Just change the CASE to your domains CASE "www.designbliss.com.au" Below is the redirect command response.redirect "au/" CA...

<?  //查询是否存在一个域名  functionSearchDomain($domainName){  //判断域名是否合法，我对正规表达式不熟悉，那位朋友有详细资料，不妨借我一阅:-)  //if(!eregi("*.*",$domainName)){  //$re[0]="域名只能是字母、数字和“－”（键盘上的减号）组成，且最大长度为26个字符。<br>请按正确的格式填写域名!";  //$re[1]=&quo...

Dimurl,host_url,no_http,host_nameAsString                  '定义变量url=HttpContext.Current.Request.Url.ToString                 ...