How to make connection string for SQL or MS-ACCESS in Classic ASP

In classic ASP, its very easy tom make a connection string , you have to pass the server name, database name, username , password as in asp.net.. You have to Class the connection string in all pages, so you can use a connection.asp as include file and call the file in All page
Connection string for SQL Server
<%   
Dim conn
strConn = "Driver={SQL Server}; Server=SQLSreverName; Database=infoA2Z; Uid=sa; Pwd=123456; Connect Timeout=9999"
 
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString= strConn
conn.Open
%>
Connection string for MS-Access

  <%   
dim conn
set conn=server.CreateObject("adodb.connection")
conn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\Projects\ASP Project\infoa2z.mdb")
 %>