asp网站目录移动后不能上传文件，求救

<form id="form1" runat="server">
  <div>
  <script type="text/javascript">
  function oo(a){
  document.getEleme ......

<%On Error Resume Next
Set conn=Server.CreateObject("ADODB.Connection")
conn.begintrans
conn.Open ("Driver={SQL Server};server=(local);uid=sa;database=student;pwd=") ......

IE 遨游 无法显示验证码
FF 可以正常显示

解决方案：（无效）
一、修改注册表，显示xbm格式的验证码
新建2k3.txt文件，复制下列代码并保存。
Windows Registry Editor Version 5.00
[HKEY_LOC ......

我用VB按MVC的构架写组件供ASP调用
BLL层
VB code:

Private Dal As New moonPotato_DAL
Public Sub inSertUser(Model As moonPotato_Model)
Dal.InSertCls (Model)
End Sub

ASP中调用
VB c ......