Here is an example:

Code:
<SCRIPT RUNAT = Server LANGUAGE = VBSCRIPT>

Sub Application_OnStart

Application("MyConnectionString") =
"DSN=FoodMart;User Id = sa;Password =;Description=FoodMart;
Server =MyServer;App=MyApp'sEnvironment;WSID =MyMachine;"

End Sub 
</SCRIPT>