For starters, here are a few changes to make:
Dim visit
Set visit = Server.CreateObject("WroxCommerce.Visit")
visit.Configure "Jo's Cofee", "jocofee.com", "driver=SQL Server;" & _
"DATABASE=Jo's Coffee; UID=jocofeeWeb; PWD=eermlate; SERVER=localhost"
You might have a lot of trouble getting this code to work. There needs to be a sql server database and possibly a com object in a dll named "WroxCommerce" that has a class named Visit. I think I had this book, but not in Russian.
Woody Z
http://www.learntoprogramnow.com
How to use a forum to help solve problems