i'm sorry lool
i remove line before i upload the file here, this line i was write it for some thing in my forum.
so , it's must be line: 145
that is:
'Check that the user the pm is being sent to exisits
'Initalise the SQL string with a query to read in the dteails of who the PM is to
strSQL = "SELECT tblAuthor.Author_ID, tblAuthor.Username, tblAuthor.Author_email, tblAuthor.PM_notify "
strSQL = strSQL & "FROM tblAuthor "
strSQL = strSQL & "WHERE tblAuthor.Username = '" & strToUsername & "';"
'Open the recordset
rsCommon.Open strSQL, adoCon