بدل محتويات ال DBConnect بالحجات دى مع مرعاة تغيير (xxxx) لبيانات سيرفرك
|
|
|
<%
Dim DBConnA, strConnectA
Set DBConnA = Server.CreateObject("ADODB.Connection")
strConnectA = "Provider=SQLOLEDB;Data Source=xxxx-PC\SQLEXPRESS;Initial Catalog=SRO_VT_ACCOUNT;user ID=xxxx;password=xxxx;"
DBConnA.Open strConnectA
%>
|