配置发布数据库服务器时碰到错误18483

在完成时，提示错误18483：未能连接到服务器“DB1”，因为“distributor_admin”未在该服务器上定义为远程登录。
请问这里应该怎么配置？应该在哪里配置这个用户？

--出现这种问题,应该是你曾经更改过计算机名

--执行下面的语句进行修复,完成后重新启动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