关于ASP输入数据(IP)星号问题

来源:百度知道 编辑:UC知道 时间:2024/06/19 03:05:32
我还有45分谁帮我搞定我就都给他啦。
如果是ASP页面我到会做。
但是因为我要用ASP生成HTML页面,所以显示的IP信息还是完整的(直接读取数据库中的IP)我想把最后一位给用星号表示请问题怎么写啊?
因为写出来要生成HTML我没这方便经验希望大虾们帮帮小弟啊~~~
对不起我才发现其实我想打输出的。不是输入!
我弄错了~~~~抱歉啊
目前的写发是
var_nrym=var_nrym&vbcrlf&"<tr>"
var_nrym=var_nrym&vbcrlf&"<td bgcolor='#FFFFFF' height='25' width='83'> 阅读次数:</td>"
var_nrym=var_nrym&vbcrlf&"<td bgcolor='#FFFFFF' width='273'><script src='/click.asp?id="&xinxiid&"'></script></td>"
var_nrym=var_nrym&vbcrlf&"<td bgcolor='#FFFFFF' width='81'> 添 加 IP:</td>"
var_nrym=var_nrym&vbcrlf&"<td bgcolor='#FFFFFF'> "&rs("ip")&"</td>"
var_nrym=var_nrym&vbcrlf&"</tr>"
生成HTML后用户看到的还是完整的IP。
可我想把最后一个数字改为星号。

在生成html之前,替换掉生成页面里输入ip地址的地方:
ip=left(ip,InstrRev(ip,".")) & "*"

在生成html之前,就替换掉啊
IP=left("&IP&",len("&IP&")-1) & replace(right("&IP&",1),"*")

要隐藏最后一串,还是最后一位?
2006年10月5日 2点23分

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

dim x(3) 'IP是以.分割为4段的,所以把IP设置成以.为分割符1维的数组,上限肯定是3
x=split(ip)
x(3)=* '即把最后一段的数字换成了*,然后重新赋值成一个字符串
for y=0 to UBOUND(X)
if y=0 then
newip=UBOUND(y)
else
newip=newip"."&UBOUND(y)
end if
NEXT

为了方便使用可以把他做成一个FUNCTION,如下

Function Chkip(ip)
dim x(3) 'IP是以.分割为4段的,所以把IP设置成以.为分割符1维的数组,上限肯定是3
x=split(ip)
x(3)=* '即把最后一段的数字换成了*,然后重新赋值成一个字符串
for y=0 to UBOUND(X)
if y=0 then
newip=UBOUND(y)
else
newip=newip"."&UBOUND(y)
end if
NEXT
ip=newip
End Function