function setCutTDStr($content, $TDWidth, $MoreColor) { $i = ''; $s = ''; $c = ''; $n = ''; $EndNumb = ''; $YesMore = ''; $content = cStr($content . ''); if ($content == '') { $setCutTDStr = $content; return @$setCutTDStr; } if ($TDWidth == '') { $setCutTDStr = $content; return @$setCutTDStr; } //TDWidth为空,则为自动 $n = 0; $YesMore = false; $EndNumb = int($TDWidth / 6.3); for ($i = 1; $i <= len($content); $i++) { $s = mid($content, $i, 1); if ($n >= $EndNumb) { $YesMore = true; break; } else { $c = $c . $s; } if (asc($s) < 0) { $n = $n + 2; } else { $n = $n + 1; } } if ($YesMore == true) { //需要处理Title标题的HTML $c = '<span Title="' . displayHtml($content) . '" style="background-color:' . $MoreColor . ';">' . $c . '</span>'; } $setCutTDStr = $c; return @$setCutTDStr; }
function printlnHtml($s) { echo displayHtml($s) . '<br />' . vbCrlf(); }
function replace_SQLText($fString) { if (isNull($fString)) { $replace_SQLText = ''; return @$replace_SQLText; } else { $fString = aspTrim($fString); $fString = replace($fString, '\'', '\'\''); $fString = replace($fString, ';', ';'); $fString = replace($fString, '--', '—'); $fString = displayHtml($fString); $replace_SQLText = $fString; } return @$replace_SQLText; }