7万条数据用ASP转换超时怎么办？

[yzflying]

SQL SERVER中表IPNEW有7万条IP地址格式是
id ip1 ip2 add

1 0.0.0.0 12.25.123.25 CHINA

我想转换成格式如：
id ip1 ip2 add

1 000000000000 012025123025 CHINA

通过以下ASP程序可以实现，但执行不到一半就超时，只转换了大概1万条左右，时间还很长，有什么办法在SQL中直接执行或者帮我优化一下这个程序，谢谢，程序如下:

<!--#include file="admin/conn.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from ipnew"
rs.open sql,conn,1,1
do while not rs.eof
MyIP1=Split(rs("Ip1"),".")
For I=0 to 3
Sip1=Sip1&String(3-Len(MyIP1(I)),"0")&MyIP1(I)
Next
MyIP2=Split(rs("Ip2"),".")
For I=0 to 3
Sip2=Sip2&String(3-Len(MyIP2(I)),"0")&MyIP2(I)
Next
id=rs("id")
sql1="select * from ipnew where id="&id
set rs1=server.CreateObject("adodb.recordset")
rs1.open sql1,conn,1,3
rs1.update
rs1("ip1")=sip1
rs1("ip2")=sip2
rs1.update
rs1.close
set rs1=nothing
'conn.execute(sql1)
'response.write sql1&"<br>"
'response.write sip1&" "&sip2&"<br><br>"
sip1=""
sip2=""
rs.movenext
loop
rs.close
set rs=nothing
conn.close
set conn=nothing