Vb & SMS & GSM Modem

I want to send and received SMS messages via a GSM Modem and import some of the data directly from the modem’s input string into a database using VB6. Is there any sample source code around to help me?

Thanx