Skip to Content

Do You Remember Your First?

I can still remember my first. It was the early 90’s and I was tasked with creating an “Intranet”.

Surfing around I found two solutions: Cold Fusion (yes it was originally spelled as two words) and Microsoft’s ASP.

ASP was free!  ASP ran on our Microsoft servers!  But then I looked to see what was involved with creating a query:

ASP

:::text
<%
Dim strname
strname=request("option")
Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString="DRIVER={Microsoft Access Driver (*.mdb)};" & _
"DBQ=c:\Documents and Settings\sarvesh\My Documents\db5.mdb"
objConn.Open

dim selectsql
selectsql = "SELECT * FROM first WHERE name = '" &  request("fname") & "' " & strname & " method = '" &  request("method")&"' "

Dim objRS
Set objRS = objConn.Execute(selectSQL)

Do while not objRS.EOF

Response.Write "_

### Name -

_"  & objRS("name") & " - " & objRS("method")

objRS.movenext
loop
objRS.close
set objRS=nothing
objConn.close
set objConn=nothing
%>

Cold Fusion

:::cfm
select BookID, Title from Books
where BookID = 

The choice was easy for me! Less code to write = less work!

On my current project I finally have the opportunity to work with ColdFusion 9 and one of the new features I was most excited to work with was ORM, and it took me back to my first cfQuery.

Make a few simple changes to Application.cfc. Define some properties and then simple do:  EntityLoad(user)

ColdFusion 9 ORM

:::cfm EntityLoad(user)

It’s just like the first time.  You smile. One line!  I’ve just gotten started and I know you can do so much more with ORM but just this simple one liner brings back the same simplicity that originally drew me towards ColdFusion.

  • Please don’t email me and say that’s a bogus ASP script - just trying to make an example  :)