Sunucuda Yüklü Bileşenler Nasıl Öğrenilir ?

Merhaba sevgili web severler,

Biraz asp yanlısı olacak ama en kısa sürede Php içinde aynı makaleyi yazacağım,

Bir Asp script çalıştırmak istiyorsanız sunucunuzda o scriptin düzgün bir şekilde çalışabilmesi için gerekli bileşenlerin yüklü olup olmadığını öğrenmeniz gerek.

Bunun yolu çok basit,

Öncelikle bir not defteri veya frontpage veya dreamweaver da yeni bir sayfa açıyorsunuz,

ve aşağıdaki kodları buraya yapıştırıyoruz;

<%
Dim ASPsanalicerik(68)
ASPsanalicerik(1) = “ADODB.Command”
ASPsanalicerik(2) = “ADODB.Connection”
ASPsanalicerik(3) = “ADODB.Recordset”
ASPsanalicerik(4) = “ADODB.Stream”
ASPsanalicerik(5) = “ADOX.Catalog”
ASPsanalicerik(6) = “AspDNS.Lookup”
ASPsanalicerik(7) = “ASPExec.Execute”
ASPsanalicerik(8) = “AspHTTP.Conn”
ASPsanalicerik(9) = “AspImage.Image”
ASPsanalicerik(10) = “AspMX.Lookup”
ASPsanalicerik(11) = “AspNNTP.Conn”
ASPsanalicerik(12) = “AspPing.Conn”
ASPsanalicerik(13) = “AspSock.Conn”
ASPsanalicerik(14) = “CDO.MESSAGE”
ASPsanalicerik(15) = “CDONTS.NewMail”
ASPsanalicerik(16) = “Dundas.Mailer”
ASPsanalicerik(17) = “Dundas.PieChartServer”
ASPsanalicerik(18) = “Dundas.PieChartServer.2”
ASPsanalicerik(19) = “Dundas.Upload”
ASPsanalicerik(20) = “Dundas.Upload.2”
ASPsanalicerik(21) = “Dundas.UploadProgress”
ASPsanalicerik(22) = “ECHOCom.Echo”
ASPsanalicerik(23) = “GuidMakr.GUID”
ASPsanalicerik(24) = “ImgSize.Check”
ASPsanalicerik(25) = “ixsso.Query”
ASPsanalicerik(26) = “ixsso.Util”
ASPsanalicerik(27) = “JMAil.Message”
ASPsanalicerik(28) = “JMail.POP3”
ASPsanalicerik(29) = “JMail.SMTPMail”
ASPsanalicerik(30) = “JRO.JetEngine”
ASPsanalicerik(31) = “Microsoft.DiskQuota.1”
ASPsanalicerik(32) = “microsoft.XMLDOM”
ASPsanalicerik(33) = “Microsoft.XMLHTTP”
ASPsanalicerik(34) = “MSWC.AdRotator”
ASPsanalicerik(35) = “MSWC.BrowserType”
ASPsanalicerik(36) = “MSWC.ContentRotator”
ASPsanalicerik(37) = “MSWC.Counters”
ASPsanalicerik(38) = “MSWC.IISLog”
ASPsanalicerik(39) = “MSWC.MyInfo”
ASPsanalicerik(40) = “MSWC.MyInfo”
ASPsanalicerik(41) = “MSWC.NextLink”
ASPsanalicerik(42) = “MSWC.PageCounter”
ASPsanalicerik(43) = “MSWC.PermissionChecker”
ASPsanalicerik(44) = “MSWC.Status”
ASPsanalicerik(45) = “MSWC.Tools”
ASPsanalicerik(46) = “MSXML.DomDocument”
ASPsanalicerik(47) = “MSXML2.DOMDocument”
ASPsanalicerik(48) = “MSXML2.DOMDocument.3.0”
ASPsanalicerik(49) = “Msxml2.FreeThreadedDOMDocument.3.0”
ASPsanalicerik(50) = “MSXML2.ServerXMLHTTP”
ASPsanalicerik(51) = “MSXML2.ServerXMLHTTP.3.0”
ASPsanalicerik(52) = “MSXML2.XSLTemplate”
ASPsanalicerik(53) = “Persits.Grid”
ASPsanalicerik(54) = “Persits.Jpeg”
ASPsanalicerik(55) = “Persits.MailSender”
ASPsanalicerik(56) = “Persits.Upload”
ASPsanalicerik(57) = “Persits.Upload.1”
ASPsanalicerik(58) = “Persits.UploadProgress”
ASPsanalicerik(59) = “POP3svg.Mailer”
ASPsanalicerik(60) = “Scripting.Dictionary”
ASPsanalicerik(61) = “Scripting.FileSystemObject”
ASPsanalicerik(62) = “Scriptlet.TypeLib”
ASPsanalicerik(63) = “SMTPsvg.Mailer”
ASPsanalicerik(64) = “SOFTWING.AspTear”
ASPsanalicerik(65) = “VBScript.RegExp”
ASPsanalicerik(66) = “WinHttp.WinHttpRequest.5.1”
ASPsanalicerik(67) = “WScript.Network”
ASPsanalicerik(68) = “WScript.Shell”
Response.write “Yüklü Bilesenler:”
On Error Resume Next
For i = 1 To Ubound(ASPsanalicerik)
Set bilesen = Server.CreateObject(ASPsanalicerik(i))
If err.number = 0 Then
Set bilesen = nothing
Response.write ASPsanalicerik(i)
End If
Err.clear
Next
%>

 

Bu sayfayı istediğiniz bir isimle kaydediyorsunuz. Ör: bilesenogran.asp

sonrası çok basit, bu sayfayı sunucuya atıp sayfayı çağırmak…

Yüklü bileşenlerin hepsinin ismi yazacak ekranda, kolay gelsin 😀

 

Yorum Yaz