ColdFusion 8 - GetDriveInfo() UDF Powered By .NET

This is an example that I used when demonstrating ColdFusion 8 .NET integration

May. 31, 2007 08:30 AM

Ben Forta's Blog

This is an example that I used when demonstrating ColdFusion 8 .NET integration on the recent usergroup tour, and as requested, I am posting it publicly. GetDriveInfo() returns a query containing specifics about the hard drives on your server, it returns all drives unless an optional drive letter is passed to it. GetDriveInfo() uses the .NET System.IO.DriveInfo class (which was introduced in .NET 2, and thus this example requires .NET 2 or 3).

Here is the code:


<cffunction name="GetDriveInfo" returntype="query" output="false">
   <cfargument name="drive" required="no" default="">

   
   <cfset var result=QueryNew("name,type,isready,format,label,totalsize,freespace",
                     "varchar,varchar,bit,varchar,varchar,double,double")>
   <cfset var sidiClass="">
   <cfset var drives="">
   <cfset var i=0>

   
   <cfobject type=".NET"
            name="sidiClass"
            class="System.IO.DriveInfo">
   
   <cfset drives=sidiClass.GetDrives()>

   
   <cfloop from="1" to="#ArrayLen(drives)#" index="i">
      
      <cfif ARGUMENTS.drive IS ""
         OR ARGUMENTS.drive EQ drives[i].Get_Name()
         OR (Len(ARGUMENTS.drive) IS 1
            AND ARGUMENTS.drive EQ Left(drives[i].Get_Name(), 1))>
         
         <cfset QueryAddRow(result)>
         
         <cfset QuerySetCell(result, "name", drives[i].Get_Name())>
         <cfset QuerySetCell(result, "type", drives[i].Get_DriveType().ToString())>
         <cfset QuerySetCell(result, "isready", drives[i].Get_IsReady())>
         
         <cfif drives[i].Get_IsReady()>
            <cfset QuerySetCell(result, "format", drives[i].Get_DriveFormat())>
            <cfset QuerySetCell(result, "label", drives[i].Get_VolumeLabel())>
            <cfset QuerySetCell(result, "totalsize", drives[i].Get_TotalSize())>
            <cfset QuerySetCell(result, "freespace", drives[i].Get_AvailableFreeSpace())>
         </cfif>
      </cfif>
   </cfloop>

   
   <cfreturn result>

</cffunction>

And here is a simple test example:


<h3>All Drives</h3>
<cfdump var="#GetDriveInfo()#">


<h3>C: Drive</h3>
<cfdump var="#GetDriveInfo("C")#">


<h3>Free Space On C Drive</h3>
<cfdump var="#NumberFormat(GetDriveInfo("C").freespace)#">

Published May. 31, 2007— Reads 11,590 — Feedback 1
Copyright © 2007 SYS-CON Media, Inc. — All Rights Reserved.
Syndicated stories and blog feeds, all rights reserved by the author.

About Ben Forta
Ben Forta is Adobe's Senior Technical Evangelist. In that capacity he spends a considerable amount of time talking and writing about Adobe products (with an emphasis on ColdFusion and Flex), and providing feedback to help shape the future direction of the products. By the way, if you are not yet a ColdFusion user, you should be. It is an incredible product, and is truly deserving of all the praise it has been receiving. In a prior life he was a ColdFusion customer (he wrote one of the first large high visibility web sites using the product) and was so impressed he ended up working for the company that created it (Allaire). Ben is also the author of books on ColdFusion, SQL, Windows 2000, JSP, WAP, Regular Expressions, and more. Before joining Adobe (well, Allaire actually, and then Macromedia and Allaire merged, and then Adobe bought Macromedia) he helped found a company called Car.com which provides automotive services (buy a car, sell a car, etc) over the Web. Car.com (including Stoneage) is one of the largest automotive web sites out there, was written entirely in ColdFusion, and is now owned by Auto-By-Tel.

Latest Cloud Developer Stories

Bringing Cloud to the Business at Cloud Expo New York

By Elizabeth White

Can you bring services from the cloud to your customers faster and have them adopt it with ease of use or bring the power of bundled services to the fingertips of your clients without creating new rigid ‘apps stove pipes'? Do you want to prevent your business running away to publ...

OCZ Launches Z-Drive R4 CloudServ PCI Express

By Pat Romanski

OCZ Technology Group, a provider of high-performance solid-state drives (SSDs) for computing devices and systems, on Tuesday announced the Z-Drive R4 CloudServ PCI Express (PCIe) flash storage solution, designed to accelerate cloud computing applications and reduce operating expe...

Cloud Expo New York: The Compliant Cloud

By Liz McMillan

Many organizations have embraced, or are considering, the benefits of cloud computing – speed, flexibility, increased expertise, shared workload, reduced costs, etc. The benefits are many – but so are the risks. What are the threats to cloud security? Which parties assume respons...

SHI Annual Revenues Up 28% in 2011

By Elizabeth White

In August 2011, SHI Enterprise Solutions (ESS) division launched the SHI Cloud, offering reliable and cost-effective industrial-grade cloud computing platforms. That same division achieved an 82 percent increase in revenue over 2010.

SoftLayer Introduces Searchable Object Storage

By Liz McMillan

SoftLayer Technologies on Tuesday announced the immediate worldwide availability of SoftLayer Object Storage, a redundant and highly scalable cloud storage service that allows users to easily store, search and retrieve data across the Internet, with optional CDN connectivity, or ...