ثانين المشكلة دي ان شاء الله رح تتحل
رح تعمل اية انا جربت الطريقة دي مضمونة اول حاجة رح تغير كود
DBConnect
2- RefundSilk
3- GetTotalSilk
4-PurchaseSilk
دولا رح تغير فهم الاي بي بتعتك
وبعدين تاخد الكود ده تحطه مكان DBConnect الكود القديم
كود بلغة HTML:
<%
Dim DBConnA, strConnectA
Set DBConnA = Server.CreateObject("ADODB.Connection")
strConnectA = "Provider=SQLOLEDB;Data Source=000000;Initial Catalog=SRO_VT_ACCOUNT;user ID=000000;password=000000;"
DBConnA.Open strConnectA
%>