How to CC to an email when Accept button is used?

I'm working on a Vacation request form for my company. I've spend
hours getting it customized just right for the HR manager with
everything he wants. I'm stuck on the final request. The form is
filled out by employees. Their managers name is auto filled out for
them to send the request to. They fill out when they will be gone and
what type of time off is requested and send it off to their manager.
Then the manager gets the request and hits an "Accept" or "Deny"
button.

Here's the question: How can I get the form to respond to the user as
well as send a copy to our HR managers email address (E-Mail Removed)?
Even better would be if I could get everything copied into a public
folder so he could have all the requests stored somewhere for permanant
reference. His email would be fine too though.

I'm new to using VBScript but I think I somehow use a case statement
but not sure how to..

I was thinking along these lines:

Select Case Action.Name
Case "Approve"
item.recipients.add("HR Dept")
Case Else
'do nothing special for other actions
End Select

I am really guessing when it comes to code though. Can someone help me
out? I'm almost there I think.

Thank You.

-Craig