<% strDSN = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" strDSN = strDSN & server.mappath("thunguyen.mdb") Set Con = Server.CreateObject("ADODB.Connection") Set Rs = Server.CreateObject("ADODB.Recordset") set cmd = server.CreateObject("ADODB.Command") %>