Angie's Test Bed
<head><script language=javascript>//Script ©opyright 2001 By Ultra@ult-tex.net function SandR(data,search,replace){ms1 = 'Search For:
(search & replace is case sensitive)'; ms2 = Replace With:(search & replace is case sensitive)'; if (data){if (srch = prompt(ms1, search)){testbed.search.value = srch; if (rep = prompt(ms2, replace)) { testbed.replace.value = rep; check = true; left_index = 0; while (check){A = data.indexOf(srch, left_index); if (A == -1) { check = false; break;} data_left = data.substring(0, A);
B = A + srch.length; data_right = data.substring(B, data.length); data = data_left + rep + data_right;
left_index = A + rep.length;} testbed.data.value = data; alert('Replaced all instances of € '+srch); }}}}
function fileSize(){size = testbed.data.value.length; window.status = 'The file size is: '+size+' bytes'; setTimeout('fileSize()', 100);}</script> |