Vendor Diretory ---------------------------------------

Sponsored in part by:

---------------------------------------

general mail order listings as well.

Let the companies know that you heard about them on the Internet.

"); echo("

    "); $count = 1; while (#$row != 0) { printf("
  • %s\n", $row[1], $row[0]); $row = msqlFetchRow($res); if ($count == $num/3 || $count == 2 * $num / 3) { echo("
    "); } $count = $count + 1; } echo("

"); echo("Please let us know via email to fins@actwin.com if you have any additions or corrections to this list.

"); } else { msqlQuery($db, "select name from vendorcats where id=$c"); $res = msqlStoreResult(); $row = msqlFetchRow($res); $category = $row[0]; echo("Category $category listings:

\n"); if (msqlQuery($db, "select v.name, v.addr, v.city, v.state, v.zip, v.phone, v.fax, v.email, v.url, v.comment, v.id from vendors v, vendorcatmap m where v.id=m.vendor and m.cat=$c and v.status=0 order by v.name") < 0) { echo("Msql failure: query \"select v.name, v.addr, v.city, v.state, v.zip, v.phone, v.fax, v.email, v.url, v.comment, v.id from vendors v, vendorcatmap m where v.id=m.vendor and m.cat=$c and v.status=0 order by v.name\" returned $ERRMSG\n"); } $res = msqlStoreResult(); $row = msqlFetchRow($res); if (msqlNumRows($res) == 0) { echo("
no listings\n"); } while (# $row != 0) { if (# $row[8] != 0) { printf("
%s", $row[8], $row[0]); } else { printf("
%s", $row[0]); } $i = 1; while ($i < 5) { if (# $row[$i] != 0) { printf(", %s", $row[$i]); } $i++; } if (# $row[5] != 0) { printf(", phone %s", $row[5]); } if (# $row[6] != 0) { printf(", fax %s", $row[6]); } if (# $row[7] != 0) { printf(", %s", $row[7], $row[7]); } if ((int) $a > 0) { printf(".
%s \n", $row[9], $row[10]); } else { printf(".
%s\n", $row[9]); } $row = msqlFetchRow($res); } } >
-----------------------------

0) { echo("Vendor Index, "); } > backFINS top-level menu

fins@actwin.com