[xXx_MaN_xXx]

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

لو الـ ID مكتوب زى ما انت عامله كده اعمله صمول sa ولو اسم جهازك صمول خليه كله كابتل وجرب