Question : variant for ServerName?

I do have a lot of forms where I always have following instructions
Set c = New ADODB.Connection
c.ConnectionString = "Driver={SQL Server};Server=Kongta_SQL;Database=Kongta"
c.Open

and I think, when I once will relocate the server/client to another network with different ServerNames, it's hard to change everywhere the ServerName & Database. I thought by placing at the top of the form
Dim Srv as Variant
Set Srv = Kongta_SQL
Set c = New ADODB.Connection
c.ConnectionString = "Driver={SQL Server};Server=Srv;Database=Kongta"
c.Open
would make it more easy to change a possible ServerName but didn't work. Any idea what would be best? I do have SQL2008 backend and Access07.accdb frontEnd
thx
Kongta

Answer : variant for ServerName?

Dim Srv as Variant
Srv = "Kongta_SQL"
Set c = New ADODB.Connection
c.ConnectionString = "Driver={SQL Server};Server=" & Srv &";Database=Kongta"
c.Open