安装完sql server 后修改计算机名后不能进行发布的订阅的解决办法

由于需要需要配置一个发布订阅，可是一直报告：" sql server 复制需要有实际的服务器名称才能连接到服务器，不支持通过别名、ip地址或其他任何备用名称进行连接。请指定实际的服务器名称“xxxx”（Replication Utlities）。"

经过一番分析发现是在安装完sql server 后修改过机器名称，运行下面两条语句既可以看出来：
       use master 

       select @@servername；   

     select serverproperty('servername')

如果这两个结果不一致，说明机器改过名字，在配置复制的时候就会报上面的错误。
     --要修复此问题  
     --执行下面的语句,完成后重新启动SQL服务 
  if   serverproperty('servername') <> @@servername  
         begin  
            declare   @server   sysname  
            set   @server   =   @@servername   
            exec   sp_dropserver   @server   =   @server  
            set   @server   =   cast(serverproperty('servername')   as   sysname)  
            exec   sp_addserver  @server = @server,@local = 'LOCAL'  
        end 
最后别忘了重新启动sqlserver服务，启动完后，运行：
      use master
      go
      select @@servername；
      select serverproperty('servername')
恢复正常。