loDataProvider.ParameterClear() loDataProvider.ParameterAdd("NoMember", lnNoMember) loDataProvider.ParameterAdd("IP", oApp.cIP) If Not loDataProvider.SQLInsert("INSERT INTO AffiliateHit (NoMember,IP) VALUES (?,?)", oApp.aConnection(1)) Then Return False End If lnPrimaryKey=loDataProvider.nPrimaryKey