"SQL Server does not exist or access denied."

[BarrMan]

I'm getting this erro when using this code:
<%
Dim Conn, Rs, SQL
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
conn.open "PROVIDER=SQLOLEDB;DATA SOURCE=HOME;DATABASE=salnews;UID=***;PWD=***"
%>
This is the full error description:
Error Type:
Microsoft OLE DB Provider for SQL Server (0x80004005)
[DBNETLIB][ConnectionOpen (Connect()).]SQL Server does not exist or access denied.
/salnews/includes/dbcon.asp, line 5

I've installed the ms sql server on my computer already,
What is the problem?

[mehere]

is the name of the sql server: HOME? is it on your local system? try using LOCALHOST