BC30807: 不再支持“Let”和“Set”赋值语句

最新推荐文章于 2025-06-22 10:25:52 发布

原创最新推荐文章于 2025-06-22 10:25:52 发布 · 4.2k 阅读

1 ·

CC 4.0 BY-SA版权

文章标签：

#sql server #sql #database #string #server #vb

本文介绍如何将ASP中的数据库连接代码迁移到.NET环境中，并解决了迁移过程中遇到的两个主要问题：'Set'语句不再受支持及特定组件的创建限制。

一、ASP原码（假设文件名为conn.asp）

<%
   dim conn
   dim sql as string
   set conn=server.createobject("adodb.connection")
   sql="driver={sql server};server=(local);uid=sa;pwd=;database=school"
   conn.open(sql)
   %>

二、把上面的代码复制到.NET中（假设文件名为conn.aspx）

<%@ Page Language="vb" AutoEventWireup="false" Codebehind="Conn.aspx.vb"

Inherits="wuliu.Conn"%>
<%
   dim conn
   dim sql as string
   set conn=server.createobject("adodb.connection")
   sql="driver={sql server};server=(local);uid=sa;pwd=;database=school"
   conn.open(sql)
   %>

编译出现的错误如下：

1：BC30807: 不再支持“Let”和“Set”赋值语句

2：无法创建组件“adodb.connection”仅可在带有 <%@ Page aspcompat=true %> 页指令的页上创建单元线程组件

三、解决办法（添加下面红色的字并且去掉set）

<%@ Page Language="vb" aspcompat=true AutoEventWireup="false" Codebehind="Conn.aspx.vb"

Inherits="wuliu.Conn"%>
<%
   dim conn
   dim sql as string
   conn=server.createobject("adodb.connection")
   sql="driver={sql server};server=(local);uid=sa;pwd=;database=school"
   conn.open(sql)
   %>