por q me dice q no es una funcion???

[Gaby_Corr]

mi duda es que en la funcion buscar quiero que vaya y busque en la tabla SQL
cierto valor si se encuentra el registro, pues que me despliegue los datos que
contiene ese registro en los inputs nombre y linea, pero el detalle que no se
me ocurre como!! =S

lo imagine con javascript.. pero creo q no se puede

algo asi:

Código:

function buscar(sistema)	  
	   call conectarDB
	   Dim sSQL, rs
	   
	   sSQL = "Select sistemas_id, sistemas_nombre, sistemas_linea FROM DS_Sistemas where sistemas_id = '"& sistema &"'"
	   Set rs = cnn.execute(sSQL)	
	   
	   if not rs.eof then  
	   	´poner en los inputs los valores del registro seleccionado
	        document.getelementById("nombre").value = rs("sistemas_nombre")
                document.getelementById("linea").value = rs("sistemas_linea")
	   end if
	   	 
	   call desconectarDB 
end function