请问这个应该怎么样改？
本来在ctc.vbs里是这样的Sub Dwclient1_CallerIDComing(CallerID,ConnectStr)
m_InCallRef = 1
m_CallerID = ""
m_InboundCallTime = Now()
m_CallerID = CallerID
DialNumber.value = m_CallerID
m_CallLogID = InsertCallLog(time(), m_CallerID, "")
ExtStatus.innerHTML = CallerID + "来电"
CallerID = change(CallerID)
Dim conn
'dim rstData
'conn = ConnDataBase2()
Set Conn = CreateObject("ADODB.Connection")
'Set Conn = CreateObject("ADODB.Connection")
'Conn.Open ConnStringTest
conn.open "DRIVER={SQL Server};SERVER=192.168.0.100;DATABASE=aa;UID=sa;PWD="aa"
strSql = "SELECT * FROM T_Customerinfo where Chandset1 = '" & CallerID & "' or Chandset2 = '" & CallerID & "' or Ctel like '" & CallerID & "'"
'msgbox (strSql)
set rstData = DataToRsStatic(conn, strSql)
'Dim RsStatic1
'On Error Resume NexT
'Set RsStatic1 = server.CreateObject("ADODB.RecordSet")
'RsStatic1.CursorLocation = 3
'RsStatic1.Open strSql,Conn,3,3
dim con
con=rstData.recordcount
'msgbox (con)
if (rstData.BOF and rstData.EOF) Then
Cnickname.innerHTML="无记录"
else
'Do Until rstData.EOF
rstData.movefirst
dim n_Cnickname
n_Cnickname = rstData("Cnickname")
dim m_Cname
n_Cname = rstData("Cname")
dim m_Csex
n_Csex = rstData("Csex")
dim n_Caddress
n_Caddress = rstData("Caddress")
dim n_Chandset1
n_Chandset1 = rstData("Chandset1")
dim n_Chandset2
n_Chandset2 = rstData("Chandset2")
dim n_Ctelfirst
n_Ctelfirst = rstData("Ctelfirst")
dim n_Ctel
n_Ctel = rstData("Ctel")
dim n_Cblack
n_Cblack = rstData("Cblack")
dim n_Cstatus
n_Cstatus = rstData("Cstatus")
dim n_Cconsumescore
n_Cconsumescore = rstData("Cconsumescore")
dim n_Cscore
n_Cscore = rstData("Cscore")
dim n_Clevel
n_Clevel = rstData("Clevel")
Cnickname.innerHTML = n_Cnickname
Cname.innerHTML = n_Cname
Csex.innerHTML = n_Csex
Caddress.innerHTML = n_Caddress
Chandset1.innerHTML = n_Chandset1
Chandset2.innerHTML = n_Chandset2
Ctelfirst.innerHTML = n_Ctelfirst
Ctel.innerHTML = n_Ctel
Cblack.innerHTML = n_Cblack
Cstatus.innerHTML = n_Cstatus
Cconsumescore.innerHTML = n_Cconsumescore
Cscore.innerHTML = n_Cscore
Clevel.innerHTML = n_Clevel
count.innerHTML="共有" & con & "条记录"
在index.asp里的文件是这样的
<table table cellspacing=1 cellpadding=0 border=0 width="69%" bgcolor="#c3bfb3">
<tr>
<td width="100" bgcolor="#CCCCCC" class="td-detail"><div align="left">注册帐号</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Cnickname" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">会员姓名</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Cname" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">性别 </div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Csex" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">家庭住址</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Caddress" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">手机1</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Chandset1" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">手机2</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Chandset2" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left">固定电话区号</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Ctelfirst" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">固定电话号码</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Ctel" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left">是否黑名</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Cblack" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">会员状态</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Cstatus" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left">消费积分</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Cconsumescore" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"> <div align="left">会员积分</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Cscore" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
<tr>
<td bgcolor="#CCCCCC" class="td-detail"><div align="left">会员级别</div></td>
<td width="120" bgcolor="#FFFFFF"><div align="center"><span id="Clevel" style="COLOR: #666666">&nbsp;</span></div></td>
</tr>
</table>
本来是在VBS里输出的，现在我想让其在.asp的文件里输出(也就是在SERVER操作数据库)，也就是当CallerID有值的时候让其刷新页面，请问这个asp里的事件应该怎么写，怎么样让CallerID值传过来
本来是想用window.open的，但他会打开个新页面，请问有没有其他的办法
[此贴子已经被作者于2005-10-19 13:32:45编辑过]
