Imports System.IO
Imports System.Net

Partial Class dillners_regenerate_print_driver
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim httpUtil As com.racadtech.Framework.Util.Http.HttpUtil = New com.racadtech.Framework.Util.Http.HttpUtil()

        Dim URL As String = "http://services.racadtech.com/RacadService/DilnerVOAPI.aspx?key=432haz8-3jz82zdklxk-42-zm032k3&dKey=" & Request("license").ToString()

        'Response.Write("URL = " & URL )
        Dim _request As HttpWebRequest = HttpWebRequest.Create(URL)
        _request.Method = WebRequestMethods.Http.Post
        _request.ContentLength = 0
        Dim _response As HttpWebResponse = _request.GetResponse()
        Dim _reader As New StreamReader(_response.GetResponseStream())
        Dim _tmp As String = _reader.ReadToEnd()
        _response.Close()
        'Response.Write(_tmp)

        Response.AddHeader("REFRESH", "120;URL=admin.aspx")
    End Sub
End Class