<%@ Page Language="VB" src="bin\test.vb"%>
<%@ Import Namespace="Num1" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System" %>
<script language="VB" runat="server">
Dim Sql1 As String = "select top 10 * from News"
Dim MyDB As SQLDB = New SQLDB()
MyDB.strSQL=Sql1
MyDb.print1
</script>
<center>
下面是利用DataGrid显示news表中一些内容!
<br><br>
<asp:DataGrid ID="MyGrid" runat="server" Width="775" BackColor="#CCFFCC" BorderColor="black" Font-Size="12px" />
</center>上面是出错文件:下面是test.vbImports System
Imports System.Configuration
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic.Strings
Imports System.MathNamespace Num1Public Class SQLDB
Public dd as String
Public strSQL As String
Public Sub Print1()
.....
End Sub
End Class
End Namespace出错信息:“/”应用程序中的服务器错误。
--------------------------------------------------------------------------------编译错误
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30188: 需要声明。源错误:
行 6: Dim Sql1 As String = "select top 10 * from News"
行 7: Dim MyDB As SQLDB = New SQLDB()
行 8: MyDB.strSQL=Sql1
行 9: MyDb.print1
行 10: </script>
源文件: H:\\net\测试类连接.aspx 行: 8
<%@ Import Namespace="Num1" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System" %>
<script language="VB" runat="server">
Dim Sql1 As String = "select top 10 * from News"
Dim MyDB As SQLDB = New SQLDB()
MyDB.strSQL=Sql1
MyDb.print1
</script>
<center>
下面是利用DataGrid显示news表中一些内容!
<br><br>
<asp:DataGrid ID="MyGrid" runat="server" Width="775" BackColor="#CCFFCC" BorderColor="black" Font-Size="12px" />
</center>上面是出错文件:下面是test.vbImports System
Imports System.Configuration
Imports System.Data
Imports System.Data.OleDb
Imports Microsoft.VisualBasic.Strings
Imports System.MathNamespace Num1Public Class SQLDB
Public dd as String
Public strSQL As String
Public Sub Print1()
.....
End Sub
End Class
End Namespace出错信息:“/”应用程序中的服务器错误。
--------------------------------------------------------------------------------编译错误
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。 编译器错误信息: BC30188: 需要声明。源错误:
行 6: Dim Sql1 As String = "select top 10 * from News"
行 7: Dim MyDB As SQLDB = New SQLDB()
行 8: MyDB.strSQL=Sql1
行 9: MyDb.print1
行 10: </script>
源文件: H:\\net\测试类连接.aspx 行: 8
解决方案 »
- Jquery 强制将光标放在文本框文字结尾处!
- 请教各位高手批量更新静态页的问题...
- ASP.NET中 VB.NET和C#如何混编译?
- 现在的搜索功能怎么回事,搜不到自己想找的东西啊
- 生成静态页面
- 各位大侠好.关于sln
- 能不能利用ajax技术实现DataGrid中的数据刷新啊?
- 最新的Javascript没有被执行 求救
- 在编译运行时候,无法创建临时文件的错误。设置iuser_machinname的权限给所说的目录也没有用
- 各位兄弟给小弟来个生成XML的例子!谢了先
- 有梦就做,做了就说,说了就解,我是一个菜鸟,希望干程序员的同行们都互相帮助,集体发展呀
- 小问题,CSS样式如何写及如何应用?
Dim Sql1 As String
Sql1 = "select top 10 * from News"
Dim MyDB As SQLDB = New SQLDB()
MyDB.strSQL=Sql1
MyDb.print1