Untitled

Página ASPX
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="registro_servicio.aspx.vb" Inherits="registro_servicio" EnableViewState="false" %>
<!DOCTYPE html>
<html xmlns="http://j.gs/8mNS">
<head runat="server">
    <meta http-equiv="Refresh" content="0; URL=http://http://localhost/ventaPasajes/paginas/registro_servicios.html" />
    <title></title>
</head>
<body>
    <form id="form1" runat="server">
    </form>
</body>
</html>

Código VB
Imports sado.Ado
Imports funciones.csFunciones
Imports System.IO
Imports System.Web.Script.Serialization

Partial Class registro_servicio
    Inherits System.Web.UI.Page

    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
        Using cn As New AdoSql(CnStrConfig(""))
            With Request
                cn.Exec("registro_servicio", .QueryString("f"), .QueryString("s"), .QueryString("l"),
                                     .QueryString("b"), .QueryString("o"), .QueryString("d"),
                                     .QueryString("v"))
            End With
        End Using
        fsordm.response_value(Me, "0")
        Response.Redirect("paginas/registro_servicios.aspx")
    End Sub
End Class