Web Development

function Init(obj, arq)
{
    obj.arq = arq;
    obj.onkeydown = dofunc;
    obj.onkeyup = dofunc;
    obj.onclick = dofunc;
}
 
function dofunc()
{
    var obj = event.srcElement;
    var arq = obj.arq;
    // Do stuff here...
}

Technically speaking the dictionary would define Visual Basic users as programmers.
But here again, a very generalized, liberal definition is being employed and it's wrong
- just plain wrong - Tom Archer 5/12/02

/*! Returns a function which has it's argument bound a given value
	\param f predicate
	\param bound_argument value to bind to the predicate's argument
*/
function bind ( f, bound_argument ) {	
	function fake () {		
		return ( f ( bound_argument ) );		
	}		
	return ( fake );	
} // end function bind ()

funtion Init ( arq ) {
    myobj.onkeydown = bind ( dofunc, arq );
    myobj.onkeyup   = bind ( dofunc, arq );
    myobj.onclick   = bind ( dofunc, arq );
}

Technically speaking the dictionary would define Visual Basic users as programmers.
But here again, a very generalized, liberal definition is being employed and it's wrong
- just plain wrong - Tom Archer 5/12/02

rs.Open "SELECT Count(*) FROM Table", con
intCount = CLng(rs(0))

Dim count : count = rs("THECOUNT")