<% Dim DBConnA, strConnectA Set DBConnA = Server.CreateObject("ADODB.Connection") strConnectA = "Provider=SQLOLEDB;Data Source=YOUR PC NAME\SQLEXPRESS;Initial Catalog=SRO_VT_ACCOUNT;user ID=sa;password=YOUR PASSWORD;" DBConnA.Open strConnectA %>