asp代码能帮忙翻译下吗 还有能帮忙解答后面几题更好

ASP代码,能帮忙翻译下吗?~

<%
dim ComeUrl,cUrl,AdminName

ComeUrl=lcase(trim(request.ServerVariables("HTTP_REFERER"))) '获取上一页的地址，即从哪一页转到这一页的。
if ComeUrl="" then '如果是被直接在地址栏输入地址进入的则提示有错。
response.write "对不起，为了系统安全，不允许直接输入地址访问本系统的后台管理页面。"
response.end
else
cUrl=trim("http://" & Request.ServerVariables("SERVER_NAME")) '获取服务器的域名
if mid(ComeUrl,len(cUrl)+1,1)=":" then '如果域名最后一个字符是":"则在域名后添加商品号
cUrl=cUrl & ":" & Request.ServerVariables("SERVER_PORT") '获取端口号并加在域名后
end if
cUrl=lcase(cUrl & request.ServerVariables("SCRIPT_NAME")) 'lcase:返回字母的小字.request.ServerVariables("SCRIPT_NAME"))是获取执行脚本的名称
if lcase(left(ComeUrl,instrrev(ComeUrl,"/")))lcase(left(cUrl,instrrev(cUrl,"/"))) then '如果上一页的域名和本页的无名不同,则提示错误.left(cUrl,instrrev(cUrl,"/")):如果域名最后有"/",则去掉这个"/"
response.write "对不起，为了系统安全，不允许从外部链接地址访问本系统的后台管理页面。 "
response.end
end if
end if

AdminName=replace(session("AdminName"),"'","") '将管理员的名称赋值给变量AdminName.session是一种服务器变量,有兴趣可以去搜索一下.
if AdminName="" then
call CloseConn() '调用CloseConn过程
response.redirect "login.asp" '转向login.asp页面
response.End()
end if
'下面的是查询数据库
sql="select UserName from Admin where UserName='" & session("AdminName") & "' and Password='" & session("AdminPassword") & "'"
set rs=conn.execute(sql)
if rs.eof and rs.bof then
rs.close
response.Redirect("login.asp")
response.End()
end if
%>

//包含链接数据库文件
<%
dim id//定义传过来的参数ID
id=request.querystring("id")//ID号等于传过来的ID
if id"" then//如果ID不等于空，那么
set rs=server.createobject("adodb.recordset")
cmd="select * from jianda where id like '"&id&"'"//打开数据库，在表jianda中找出符合条件的ID信息
rs.open cmd,conn,1,3
rs.delete//删除
rs.update//更新数据库
response.Write("alert('试题删除成功');window.location.href('jianda.asp')")//显示出试题删除成功的提示
else//否则
response.Write("alert('请至少选择一道试题');window.location.href('jianda.asp')")//显示出请至少选择一道试题的提示
response.end//显示结束
end if//条件结束
%>

1、获取表单“新闻标题”的内容
2、获取地址栏“学号”的内容
3、读取数据库的虚拟路径
4、跳转到index.asp这个页面
5、定义session(“地址”)的值
6、输出 session(“学历”)的值
7、换行
8、输出“你好”和一条水平线
9、定义一个“商品编号”变量
10、移到最后一条记录
11、移到第一条记录
12、查询news表中的所有内容
13、字段数目
14、删除记录中的姓名等于张三这条记录
15、本页表单提交到33.asp，方法为post

1、从右边读值
2、将大写换为小写
3、读取字符长度
4、时间 5、随机 6、将数值转为字符 7、将字符转为整型
8、逻辑与 9、不等于 10、整除

除掉太简单的就是不会的，你还是找书吧，有打字的时间翻书页就够了的。

这是基本知识……书上有………………

1、获取表单的内容
2、获取地址栏的内容
3、设置虚拟路径
4、网页重定向
5、定义session
6、输出session的内容
7、转到下一行
8、输出你好和一条水平线
9、定义一个变量
10、移到最后一条记录
11、移到第一条记录
12、查询news表中的所有内容
13、字段数目
14、如果记录中的姓名等于张三就删除这条记录
15、本页表单提交到33.asp，方法为post
.
.
.
.
老大这太简单了，自己再查查吧

---

鄯善县13777995252： 帮翻译下ASP代码 - ？
奚阁立复： 以上引入文件...

鄯善县13777995252： 一段asp 的验证码的代码 麻烦帮我翻译下 谢谢？
奚阁立复： 这是个vbs自定义函数 dim 开头的定义变量 接下来nstr=cstr(nums)转换为字符赋值给nstr 再通过逐一截取字符串nstr字符转为数值写入数组arr_img(numl) 然后创建Adodb.Stream对象,并载入文件 validatehead.fix 通过这个文件生成图片.

鄯善县13777995252： ASP代码翻译 - ？
奚阁立复： 你这就是一asp.net的静态页面啊,,asp里面的控件都是 结尾的,,就一设计页面,,相当于html页面,有神马好解释的? 如果实在不懂,你一个标记一个标记的百度,,看看这些控...

鄯善县13777995252： 帮我翻译下这几条ASP代码 - ？
奚阁立复： product_name=trim(request(＂product_name＂)) //把获得的product_name的值两边的空格去掉赋值给product_name if request(＂sort_name＂)=＂＂ then //如果获得的sort_name的值为空,则执行下面的程序 sql=＂select * from 56770_product ...

鄯善县13777995252： 麻烦帮忙翻译下ASP中连接数据库的这段代码？
奚阁立复： Server.scriptTimeout=＂10＂ '设置超时时间为10秒connstr=＂DBQ=＂+server.mappath(＂data.mdb＂)+＂;DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};＂'设定连接字符串.前面是指明数据库的路径.后面是调用ACCESS驱动 set conn=Server.CreateObject(＂ADODB.connection＂) '实例化……这句无需理解,反正肯定要用conn.open connstr '最后,打开连接

鄯善县13777995252： ASP帮忙翻译一小段代码？
奚阁立复： <% exec=＂select * from guestbook＂ '给字符串exec赋值为查询语句select * from guestbook; set rs=server.createobject(＂adodb.recordset＂) '设置rs为ado记录集,即数据记录集合. rs.open exec,conn,1,1 'rs.open执行查询语句,中有4个参数值...

鄯善县13777995252： 求高手帮忙翻译一下ASP代码?？
奚阁立复： dim admin_name,admin_pwd //定义二个参数 admin_name=trim(request(＂name＂)) //给参数赋接收到的值 admin_pwd=trim(request(＂pwd＂)) //给参数赋接收到的值 if admin_name=＂＂ or admin_pwd=＂＂ then //判断用户名或密码是否为空 ...

鄯善县13777995252： ASP 能帮我翻译一下是什么意思吗?？
奚阁立复： strLogFile=＂mima.txt＂ '---文件变量,因该是日志文件 '---获取传递参处 Name=request(＂Name＂) '---姓名 Pass=request(＂Pass＂) '---密码 biner=request(＂biner＂) '--- IP=request(＂IP＂) '---ip地址 '---判断三个参数如果有一个为＂＂,停止执...

鄯善县13777995252： 请高手帮忙翻译一下ASP代码?？
奚阁立复： <% dim admin_name,admin_pwd '定义两个参数 admin_name=trim(request(＂admin_name＂)) '给参数赋接收到的值(去空格) admin_pwd=trim(request(＂pwd＂)) '同上 set rs=server.createobject(＂adodb.recordset＂) '打开记录集,赋值到rs ...

鄯善县13777995252： 这段Asp代码是什么意思啊?知道的帮我翻译下,谢谢？
奚阁立复： &lt;%'dimin 注释,不用看 id=request(＂id＂) 把传过来的参数id赋给自定义变量id set rs=server.CreateObject(＂adodb.recordset＂) 设置rs为数据集 if id=＂＂ then 判断id等于空时 rs.open ＂select * from xr_news where nclassid=663 order by ...