leading 0 missing in column when exporting to csv
Leading zeroes are removed if the exporter thinks the column is numeric.  You need to force the exporter to treat that column as text.

For instance, this might work:

chr(34) + (Right(products_vendor1.shortISBN13,5)) + chr(34)