UC知道程序语言 谁能解释下
来源：百度知道 编辑：UC知道 时间：2024/05/14 08:51:44
<%@ import namespace="system.data" %> '请注释，并说明此处注释为什么会显示：
<%@ import namespace="system.data.oledb" %> '请注释，并说明此处注释为什么会显示：
<link rel="stylesheet" href="main.css"> '请注释，并说明此处注释为什么会显示：
<Script language="Vb" runat="Server" Debug="True"> '请注释：
Sub page_load(sender as object , e as eventargs) '请注释：
Dim Conn as new Oledbconnection() '请注释：
Dim SQL_String as string '请注释：
SQL_String = "select * from bysj" '请注释：
Conn.connectionstring = "provider=microsoft.jet.oledb.4.0;data source = " & server.mappath("Info.mdb") '请注释：
Conn.open() '请注释：
Dim Com as new Oledbcommand(SQL_String,conn) '请注释：
Dim Datareader as OledbDatareader = Com.executereader() '请注释：
response.write("<TABLE width='99%' height='0' b
<%@ import namespace="system.data.oledb" %> '请注释，并说明此处注释为什么会显示：
<link rel="stylesheet" href="main.css"> '请注释，并说明此处注释为什么会显示：
<Script language="Vb" runat="Server" Debug="True"> '请注释：
Sub page_load(sender as object , e as eventargs) '请注释：
Dim Conn as new Oledbconnection() '请注释：
Dim SQL_String as string '请注释：
SQL_String = "select * from bysj" '请注释：
Conn.connectionstring = "provider=microsoft.jet.oledb.4.0;data source = " & server.mappath("Info.mdb") '请注释：
Conn.open() '请注释：
Dim Com as new Oledbcommand(SQL_String,conn) '请注释：
Dim Datareader as OledbDatareader = Com.executereader() '请注释：
response.write("<TABLE width='99%' height='0' b
<%@ import namespace="system.data" ‘引入名称空间 处注释不会显示：
%> <%@ import namespace="system.data.oledb" %> <!--这样注释也不会显示--
<link rel="stylesheet" href="main.css"> <!--引入css样式表-->
<Script language="Vb" runat="Server" Debug="True">
'此处开始是后台代码 同<%%>内的内容, 注释显示是因为你在html里写入了vb语言的注释.
Sub page_load(sender as object , e as eventargs) '页面加载事件 过程开始
Dim Conn as new Oledbconnection() '定义数据库连接对象
Dim SQL_String as string '定义存sql语句的变量
SQL_String = "select * from bysj" '请注释：定义查询sql语句
Conn.connectionstring = "provider=microsoft.jet.oledb.4.0;data source = " & server.mappath("Info.mdb") '请注释： 定义连接对象的连接字符串
Conn.open() '请注释：打开连接
Dim Com as new Oledbcommand(SQL_String,conn) '请注释：定义sql语句执行对象 cmd
Dim Datareader as OledbDatareader = Com.executereader() '请注