بطئ عند شراء او استخدام scroll

[Marcus1337]

لما باجي اشتري حاجه من الnpc بيقعد فتره عقبال ما اعرف اشتريها

وبرضو لما باجي اضرب السكرول بياخد وقت برضو وادي سكرينه للي بيتكتب في ال gs

[Scrox]

هات صورة من db_connect.asp و GetTotalSilk.asp.

[Marcus1337]

get total silk

<!-- #include file = "DBConnect.asp" -->
<!-- #include file = "Function.asp" -->
<!-- #include file = "Class_MD5.asp" -->
<%

On Error Resume Next

' Error
If Err.Number <> 0 Then
	Response.Write "-1"
	Response.End
End If

'''''''''' Check ACL only Call from Billing Server
Dim IP
Dim BillingServer
BillingServer = "136.243.227.247"
IP = Request.ServerVariables("REMOTE_ADDR")
'If(IP <> BillingServer) Then
'	Response.Write "ACCESSDENY"
'	Response.End
'End If
''''''''''
Dim sdSQL
Dim sdRS
Dim ReturnValue

sdSQL = "SET NOCOUNT ON  EXEC CGI.CGI_WebGetTotalSilk "
'Response.Write sdSQL
'Response.End

Set sdRS = DBConnA.Execute(sdSQL)
ReturnValue = sdRS(0)

sdRS.Close
Set sdRS = Nothing
DBConnA.Close
Set DBConnA = Nothing

' Error
If Err.Number <> 0 Then
	Response.Write "-1"
	Response.End
End If
Response.Write ReturnValue
Response.End
%>

db connect

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

%>

[Marcus1337]

up

[Neoon]

C:\inetpub\wwwroot\ folder and edit the db_connect.asp and the GetTotalSilk.asp. to your sql server

كود PHP:

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

%> 


كود PHP:

'''''''''' Check ACL only Call from Billing Server
Dim IP
Dim BillingServer
BillingServer = "5.20.34.16x"
IP = Request.ServerVariables("REMOTE_ADDR")
'If(IP <> BillingServer) Then
'    Response.Write "ACCESSDENY"
'    Response.End
'End If 


[Hamza FiGo]

دا تقل من ال vps ياباشا + الفلتر اللي انت بتستخدمه لو مستخدم فلتر اساسا

[Marcus1337]

المشاركة الأصلية كتبت بواسطة Neoon عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

C:\inetpub\wwwroot\ folder and edit the db_connect.asp and the GetTotalSilk.asp. to your sql server

كود PHP:

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

%> 


كود PHP:

'''''''''' Check ACL only Call from Billing Server
Dim IP
Dim BillingServer
BillingServer = "5.20.34.16x"
IP = Request.ServerVariables("REMOTE_ADDR")
'If(IP <> BillingServer) Then
'    Response.Write "ACCESSDENY"
'    Response.End
'End If 


تمام تسلم

المشاركة الأصلية كتبت بواسطة Hamza FiGo عفوا ,,, لايمكنك مشاهده الروابط لانك غير مسجل لدينا [ للتسجيل اضغط هنا ]

دا تقل من ال vps ياباشا + الفلتر اللي انت بتستخدمه لو مستخدم فلتر اساسا

هي فعلا تقل من الفلتر

[افندينا ™Hamboka™]

##