帮我解释下几句程序 - ASP技术论坛

问题点数：0 回复次数：5

帮我解释下几句程序

1.        <%
2.        function Inquery
3.        tablename="产品类别"
4.       OBJCONN=SERVER.CreateObject("ADODB.Connection")
5.       strDSN="DSN=Trate;uid=test;pwd=test1"
6.       OBJConn.open strDSN
7.       strSQL="Insert Into"&Tablename&"Value("&_" ' "                   （解释下）
8.       &Request.FORM("NewClassifyNo")&" ', "&_                          （解释下）
9.       " ' "& Request.Form("Newclassifyinfo")&" ' ")"                         （解释下）
10.      Set rs =objconn.execute(strsql)                                            （解释下）
11.      strSQL="select*from"&tablename                                          （解释下）
12.      Set rs=objconn.execute(strsql)                                              （解释下）
13.      response.write" SQL Query的内容:"&strSQL
14.      if not rs.eof then                                                                    （解释下）
15.      response.write"<Table Border=1>"
16.      rs.movefirst                                                                            （解释下）
17.      fdcount=rs.fields.count                                                             （解释下）
18.      response.write"<tr>"
19.      for i=o to fdcount -1
20.      response.write "<tr><font size=2>"&rs.fields(i).name&"</font></td>"
21.      next
22.      response.write "</tr>"
23.      do while not rs.eof                                                                      （解释下）
24.      response"<tr>"
25.      for i =0 to fdcount-1
26.      response.write"<td><font size=2>"&rs.fields(i).value&"</font></td>"
27.      next
28.      response.write"</tr>"
29.      rs.movenext                                                                                 （解释下）
30.      loop
31.      response.write"</table>"
32.     else
33.     response.write"没有相符的信息可供读取！"
34.     end if
35.     OBJconn.close
36.     set rs=Nothing
37.     set OBJConn=Nothing
38.     end funcition
39.     %>

（以上有标注的行，大侠帮我解释下，小弟在这跪谢了）
第5行的strDSN是什么东西？str打头的是什么意思？
我还问下，要看懂这些函数，要用什么样的书，比较好？

搜索更多相关主题的帖子: 解释　

第 2 楼

得分:0

第5行的strDSN是连接数据库时的一个变量，str打头不过是为了好记而已了

第七行追加一条记录
7、8、9应该是写在一行吧？
8、9从FORM集合得到数据
10 创建recordset 对象、包含数据的游标"rs"
11 把要查询的语句付值给strsql
12 同10
13 写出SQL Query
15 写出html 标签 "<Table Border=1>"
16 指针移到第一条记录
17 给变量赋值 fields的数量
18 写出HTML 标签<tr>
23 循还语句：当不是最后一条记录的时候运行到30句循还，当是最后一条记录时退出循还
29 移动到下一条记录

基本上就是这样的，多看一下ASP方面的书先要熟悉ASP的几大对像，基本上就都能看明白了，然后可以再深一点学

" target="_blank">

/images/lg.gif" border="0" onload="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onmouseover="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.style.cursor='hand'; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onclick="if(!this.resized) {return true;} else {window.open('http://www./images/lg.gif');}" onmousewheel="return imgzoom(this);" alt="" /> 国际.国内顶级域名只要45元,400MASP空间仅299元,30天无条件退款(域名除外)/adlm" target="_blank">

/adlm/images/adlm_top.gif" border="0" onload="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onmouseover="if(this.width>screen.width*0.7) {this.resized=true; this.width=screen.width*0.7; this.style.cursor='hand'; this.alt='Click here to open new window\nCTRL+Mouse wheel to zoom in/out';}" onclick="if(!this.resized) {return true;} else {window.open('http://www./adlm/images/adlm_top.gif');}" onmousewheel="return imgzoom(this);" alt="" />

第 3 楼

得分:0

1.        <%
2.        function Inquery
3.        tablename="产品类别"
4.       OBJCONN=SERVER.CreateObject("ADODB.Connection")
5.       strDSN="DSN=Trate;uid=test;pwd=test1"　　'这里str开头的变量基本都是string类型的，使用str开头于其他变量以示区别
6.       OBJConn.open strDSN　　　　　　　　　　'strDSN作为OBJCONN这个ADODB.Connection对象的连接串，用来连接DSN中指定的数据库
7.       strSQL="Insert Into"&Tablename&"Value("&_" ' "            'strSQL赋值为一个较长的SQL语句字符串，每小段使用&联接，这里是１个插入操作
8.       &Request.FORM("NewClassifyNo")&" ', "&_                    'Request.FORM("NewClassifyNo")的值是提交的表单中id/name为NewClassifyNo对象的值
9.       " ' "& Request.Form("Newclassifyinfo")&" ' ")"                  'Request.Form("Newclassifyinfo")　同上道理
10.      Set rs =objconn.execute(strsql)       '运行strSQL这句SQL语句并返回给rs对象，这里返回是否正确执行，其实可以仅仅写objconn.execute(strsql)
11.      strSQL="select*from"&tablename                                    '重新负值strSQL为１个查询操作的SQL语句
12.      Set rs=objconn.execute(strsql)                                        '运行strSQL这句SQL语句并返回给rs对象，查询语句返回ADODB.RecordSet对象
13.      response.write" SQL Query的内容:"&strSQL
14.      if not rs.eof then                                                               '判断如果对象rs的eof属性不为True时则进行如下操作
15.      response.write"<Table Border=1>"
16.      rs.movefirst                                                                       '使用rs对象的MoveFirst方法，记录游标移动到第一个，以便后续操作
17.      fdcount=rs.fields.count                                                      '将rs对象的field元素的count属性府值给fdcount，既是　字段数量
18.      response.write"<tr>"
19.      for i=o to fdcount -1
20.      response.write "<tr><font size=2>"&rs.fields(i).name&"</font></td>"
21.      next
22.      response.write "</tr>"
23.      do while not rs.eof                                                                      '循环执行循环体直到　rs对象eof属性为True
24.      response"<tr>"
25.      for i =0 to fdcount-1
26.      response.write"<td><font size=2>"&rs.fields(i).value&"</font></td>"
27.      next
28.      response.write"</tr>"
29.      rs.movenext                                                                                 '使用rs对象的MoveNext方法，记录游标后移１个，指向下一个记录以便后续操作

30.      loop　　　　　　　　　　　　　　　　　　　　　　　　　　　'对应do while 结构的结束
31.      response.write"</table>"
32.     else
33.     response.write"没有相符的信息可供读取！"
34.     end if
35.     OBJconn.close　　'关闭数据库连接
36.     set rs=Nothing　　'销毁对象
37.     set OBJConn=Nothing
38.     end funcition
39.     %>

'不对的地方请包含，最近比较忙，时间仓促

看书，就看  VB　VBScript的　就可以了，　ASP　到底就是这些了

我当时刚使用ASP的时候，VB也不怎么用，就看　VBScript　的　微软手册，后来搞了１个ASP　的手册，就够了，不用多

VB, Delphi, ASP, PHP, JSP, .NET MS SQL, My SQL, Oracle Diablo, StarCraft, WarCraft, World of Warcraft

第 4 楼

得分:0

看看数据库的连接部分和几个和数据库相关的对象撒

第 5 楼

得分:0

好的，非常感谢各位，特别是2楼哦~~~~~~~~

第 6 楼

得分:0

我感觉还是三楼的解释的更美观

嗯

口头表扬~！

">东搞一下西搞一下