如何在Visual Basic 2013中使用DirectCast中的String？

Question

我正在使用以下代码尝试DirectCast for Json -

Dim EmailId as String
Dim URL as String
EmailId = txtEmailId.Text
URL = "http://localhost/json.php?id=" & EmailId

request = DirectCast(URL, HttpWebRequest)
response = DirectCast(request.GetResponse(), HttpWebResponse)
reader = New StreamReader(response.GetResponseStream())

问题是，上述方法仅在我将电子邮件ID硬编码到URL中时才有效。例如DirectCast("http://localhost/json.php?id=abcd@gmail.com", HttpWebRequest)。当尝试将电子邮件ID作为变量时，我得到以下错误 -

  

“String”类型的值无法转换为   'System.Net.HttpWebRequest'。

请帮我完成这项工作。

Answer 1

request = WebRequest.Create(URL)