$numero = 1;
while (...) {

print "<a name="ancora$numero"></a>";
$numero = $numero++;
}