<%@Language="JavaScript" EnableSessionState="false" %>
<%
//Response.*******Type = "application/xhtml+xml;charset=ISO-8859-9"
var accept = String(Request.ServerVariables("HTTP_ACCEPT"));
var ua = String(Request.ServerVariables("HTTP_USER_AGENT"));
if (accept != null && ua != null) {
if (accept.indexOf("application/xhtml+xml") >=0 || ua.indexOf("W3C_Validator") >= 0) {
Response.*******Type = "application/xhtml+xml;charset=ISO-8859-9";
}
}
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="tr">
<head>
<**** http-e****="*******-type" *******="application/xhtml+xml; charset=iso-8859-9" />
<title>ASP JavaScript Veritabanı test sayfası</title>
<**** name="generator" *******="Notepad, see http://www.microsoft.com/windows/" />
</head>
<body>
<div>
<% // Öncelikle bir fonksiyona ihtiyacımız var.
// Bu fonksiyon nesneleri oluşturup sonra silecek ve hata olursa bize geri bildirim yapacak
function Detect(name)
{
try {
var obj = Server.CreateObject(name);
/*if (obj != null) return true;// Ulaşılamaz kod algılandı
delete obj;
obj = null;*/
var s = true; // Kestirme kod fakat bellek açısında verimli...
if (obj != null) {
delete obj;
obj = null;
}
return s;
}
catch (e) {return false;}
return false;
}
var objeler = new Array("ADODB.Connection", "ADODB.Recordset", "CDONTS.NewMail");
for (var i = 0; i < objeler.length; i++)
{
Response.Write( Detect(objeler[i]) ? "Yüklü" : "Yüklü Değil" );
}
%>
</div>
</body>
</html>
İşte bukadar. hatta bazı programcılar (benim gibi mesela) Scripting.Dictionary nesnesi ile otomatik COM destekli diziler oluşturabilirler fakat gereksiz. Gerekli neden çünkü nesnelerin adları ile oluşturma adları farklı olduğundan. Anlatmak istediğim CDONT mesela yada ADODB biz şimdi ADODB.Recordset ile kayıtseti oluşturuyoruz ama bahsettiğimiz zamanda ADODB yada ADO diye söylüyoruz kısacası Scripting.Dictionary nesnesinin Add metoduna iki tane parametre girilerek istediğiniz gibi bir biçimleme oluşturabilirsiniz. ozaman kodumuz şöyle olurdu
var objeler = Server.CreateObject("Scripting.Dictionary");
objeler.Add("ADO", "ADODB.Connection");
yada objeler.Add("ADO", "ADODB.Recordset");
hatta objeler.Add("CDONTS", "CDONTS.NewMail");
sonrada kodumuzda ufak bir değişiklikle
for (var i = 0; i < objeler.Count; i++)
{
Response.Write( Detect(objeler.Items[i]) ? objeler.Keys[i] + "Yüklü" : objeler.Keys[i] + "Yüklü Değil" );
}
alıntıdır..
![[Resim: 114ld.jpg]](http://b1112.hizliresim.com/s/c/114ld.jpg)