<%
strConnect="Provider=SQLOLEDB.1;Data Source=(local);Initial catalog="&Application("DB")&";user ID="&Application("DB_id")&";Password="&Application("DB_pwd")
'StrCon = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=nambu;Initial Catalog=nambu;Data Source=NAMBU-WEB"
'strConnect="Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog="&Application("DB")&";User ID="&Application("DB_id")&";Data Source=(local)" '°ζ·Ξ ΑφΑ€

Set DbCon2=Server.CreateObject("ADODB.Connection")
DbCon2.Open strConnect
%>