VB.NET获取当前URL方法浅谈

开发 后端
如果想要获取URL,并且获取当前的URL的话,应该如何操作才能达到目的呢?大家可以通过这里介绍的VB.NET获取当前URL操作方法来对此有一个掌握。

大家可能还记得我们51CTO网站的关于VB.NET专题中的一些介绍,这门语言能给我们带来非常多的好处。比如今天为大家介绍的VB.NET获取当前URL的相关操作方法,就可以从中看出VB.NET的功能特点。#t#

不过在了解VB.NET获取当前URL的操作之前,还是让我们先简单的介绍一下这门语言的主要特点。

1.真正成为面向对象以及支持继承性的语言。

2.窗体设计器支持可视化继承,并且包含了许多新的特性,比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据。

3.直接建立在.NET的框架结构上,因此开发人员可以充分利用所有.NET平台特性,也可以与其他的.NET语言交互。

4.为Windows应用程序提供了XCOPY部署,开发者不再需要为DLL的版本问题担忧。

5.代码托管。被托管的代码享受.netframework提供的安全保障和垃圾回收机制,但是这也同时表明,你的程序被框在Framework里面了。API变得不太方便。

6.强大的面向对象特性。现在VB7已经是一个完全的面向对象程序。

7.功能强大,程序界面更标准。

8.程序代码结构化更强,开发环境舒适体贴。

VB.NET获取当前URL主要代码示例:

 

  1. Protected Function GetUrl() As String   
  2. Dim strTemp As String = ""   
  3. If (Request.ServerVariables("HTTPS") = "off") Then   
  4. strTemp = "http://"   
  5. Else   
  6. strTemp = "https://"   
  7. End If   
  8. strTemp = (strTemp + Request.ServerVariables("SERVER_NAME"))   
  9. If (Request.ServerVariables("SERVER_PORT") <> "80") Then   
  10. strTemp = (strTemp + (":" + Request.ServerVariables("SERVER_PORT")))   
  11. End If   
  12. strTemp = (strTemp + Request.ServerVariables("URL"))   
  13. If (Request.QueryString.ToString.Trim.Length <> 0) Then   
  14. strTemp = (strTemp + ("?" + Request.QueryString))   
  15. End If   
  16. Return strTem   
  17. End Function  

 

VB.NET获取当前URL的具体操作方法就为大家介绍到这里。

责任编辑:曹凯 来源: itwis.com
相关推荐

2009-10-14 12:51:41

VB.NET Data

2009-10-20 09:39:04

VB.NET Butt

2010-01-21 17:23:05

VB.NET Radi

2009-10-28 10:31:23

VB.NET Impl

2009-10-13 11:22:46

VB.NET调用Web

2010-01-22 13:08:50

VB.NET创建数组

2009-10-16 10:14:26

VB.NET使用Fil

2009-10-12 13:32:58

VB.NET线程构造器

2010-01-22 11:15:50

VB.NET固定值变量

2009-11-03 09:26:13

VB.NET方法

2009-10-19 11:28:42

VB.NET语言.NET开发语言

2010-01-21 15:10:37

VB.NET静态托盘程

2009-06-29 10:50:18

VB.NET面向对象能力

2010-01-21 09:53:55

VB.NET获取程序运

2009-11-03 10:51:33

VB.NET共享

2010-01-21 10:48:18

VB.NET扩展方法

2009-10-27 11:32:42

VB.NET Disp

2010-01-07 15:25:11

VB.NET数组

2009-10-14 16:46:25

VB.NET OnSt

2009-10-30 15:37:23

VB.NET Sub创
点赞
收藏

51CTO技术栈公众号