<% Sub ShopPinNumbers (conn,OrderID,processed) ' dummy Pin number logic vp-asp 6.50 end sub %>