<%
	Set db=Server.CreateObject("ADODB.Connection")
	'db.open("PROVIDER=SQLOLEDB;DATA SOURCE=203.116.91.106;UID=vtuser01;PWD=vtuser01;DATABASE=yogain_asia")
	db.open("PROVIDER=SQLOLEDB;DATA SOURCE=10.10.10.11;UID=devuser01;PWD=devuser01;DATABASE=sennheiser_ecom")
	
	Function SafeSQL(paramSQL)
		SafeSQL = Trim(Replace(paramSQL,"'","''"))
	End Function

%>