Professor6T9 Web SheLL

Windows NT WEB-23 10.0 build 17763 (Windows Server 2016) i586
Microsoft-IIS/10.0
103.118.16.173

File Name : EmailSalesOrder.aspx.vb

Partial Class PrintSalesOrder
    Inherits System.Web.UI.Page
    Dim countrydt As DataTable
    Dim statedt As DataTable
    Dim MainID As Integer
    Dim VatAmount As Double = 0.0
    Dim FooterTotalAmount As Double = 0.0
    Dim TotalKg As Integer = 0
    Dim temp As String
    Dim blogcookie As HttpCookie
    Protected Sub Page_Init(sender As Object, e As EventArgs) Handles Me.Init
        If Session("UserId") = Nothing Then
            MaintainSession()
        End If
    End Sub

Public Sub MaintainSession()
        blogcookie = Request.Cookies.Get("blogcookievalue")
        If blogcookie.Value = "None" Then
            Response.Redirect("Login.aspx")
        Else
            Dim strArr() As String
            strArr = blogcookie.Value.Split(",")
            For i As Integer = 0 To strArr.Count - 1
                If i = 0 Then
                    Session("UserId") = strArr(i)
                    temp = strArr(i)
                ElseIf i = 1 Then
                    Session("DUserId") = strArr(i)
                    temp = strArr(i)
                ElseIf i = 2 Then
                    Session("UserName") = strArr(i)
                    temp = strArr(i)
                ElseIf i = 3 Then
                    Session("UserRoleID") = strArr(i)
                    temp = strArr(i)
                ElseIf i = 4 Then
                    Session("UName") = strArr(i)
                    temp = strArr(i)
                ElseIf i = 5 Then
                    Session("Audlog_Id") = strArr(i)
                    temp = strArr(i)
                End If
            Next
        End If
    End Sub

Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
        If Not IsPostBack Then
            If Not Request.QueryString("Id") = Nothing Then
                Try
                    FillDetail()
                    Fillcompany()
                    FillPrimaryCont()
                    FillMainProduct()
                    FillBillingAddressDetail()
                    FillShippingAddressDetail()
                    FillfooterDetail()
                    Fillowner()
                    sendordermail()
                Catch ex As Exception
                    Dim error1 As String = ex.Message.Replace(Chr(34), "")
                    error1 = error1.Replace(Chr(39), "")
                    ExecptionBLL.Insert("PrintSalesOrder", "Page_Load", error1, Session("UserId"))
                    ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
                End Try
            Else
                ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('There is no order to print!')", True)
            End If
        End If
    End Sub

Public Sub FillDetail()
        Try
            MainID = Security.Decrypt(HttpUtility.UrlDecode(Request.QueryString("Id")))
            Dim dt As DataSet = MainBLL.ViewByID(MainID, "EditOrderViewByID")
            Dim dtUser As New DataTable
            dtUser = dt.Tables(0)
            Dim drLogin As DataRow
            drLogin = dtUser.Rows(0)
            lblmodeofpayment.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_TermsPayment").ToString())
            lblpono.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_PoNo").ToString())
            If Not String.IsNullOrEmpty(drLogin("Order_PoDate").ToString()) Then
                lblpodate.Text = DynamicparcelDataManipulation.DateFormatfirstdate(drLogin("Order_PoDate").ToString())
            End If
            lblorderdate.Text = DynamicparcelDataManipulation.DateFormatfirstdate(drLogin("Order_CreatedDate").ToString())
            lblordercode.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_Code").ToString())
            hfcustid.Value = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_CustId").ToString())
            hfownerid.Value = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_CreatedID").ToString())
            hfFreight.Value = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_Freight").ToString())
            hfCompanyid.Value = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_Billedfrom").ToString())
            lbltermsofdelivery.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_TermsDelivery").ToString())
            lbldispatch.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Order_Dispach").ToString())
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "FillDetail", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub FillBillingAddressDetail()
        Try
            countrydt = MainBLL.Dropdown("CountryDropDown").Tables(0)
            statedt = MainBLL.Dropdown("ALLStateDropDown").Tables(0)
            MainID = hfcustid.Value
            Dim dt As DataSet = MainBLL.ViewByID(MainID, "ProspectBillingAddressViewByID")
            Dim dtUser As New DataTable
            dtUser = dt.Tables(0)
            If dtUser.Rows.Count > 0 Then
                Dim drLogin As DataRow
                drLogin = dtUser.Rows(0)
                If String.IsNullOrEmpty(drLogin("AccAddr_Name").ToString()) Then
                    lblnamebill.Visible = False
                Else
                    lblnamebill.Visible = True
                    lblnamebill.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Name").ToString())
                    'lblbuyerref.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Name").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_Telephone").ToString()) Then
                    ' lblcontacbill.Visible = False
                Else
                    lblcontacbill.Visible = True
                    lblcontacbill.Text = "Phone: " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Telephone").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_Email").ToString()) Then
                    ' lblcontacbill.Visible = False
                Else
                    lblcontacbill.Visible = True
                    lblcontacbill.Text = " Email: " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Email").ToString())
                End If
                
                If String.IsNullOrEmpty(drLogin("AccAddr_Address").ToString()) Then
                    lbladdressbill.Visible = False
                Else
                    lbladdressbill.Visible = True
                    lbladdressbill.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Address").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_Pincode").ToString()) Then
                    lblpincodebill.Visible = False
                Else
                    lblpincodebill.Visible = True
                    lblpincodebill.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Pincode").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_City").ToString()) Then
                    lblCitybill.Visible = False
                Else
                    lblCitybill.Visible = True
                    lblCitybill.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_City").ToString())
                End If
                Dim country As Array = countrydt.Select("ID = '" + drLogin("AccAddr_Country").ToString() + "'")
                If country.Length <> 0 Then
                    lblcontrybill.Text = country(0)(1).ToString + " "
                End If
                Dim state As Array = statedt.Select("ID = '" + drLogin("AccAddr_State").ToString() + "'")
                If state.Length <> 0 Then
                    lblstatebill.Text = state(0)(1).ToString
                End If
            End If
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "FillBillingAddressDetail", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub FillShippingAddressDetail()
        Try
            countrydt = MainBLL.Dropdown("CountryDropDown").Tables(0)
            statedt = MainBLL.Dropdown("ALLStateDropDown").Tables(0)
            MainID = hfcustid.Value
            Dim dt As DataSet = MainBLL.ViewByID(MainID, "ProspectShippingAddressViewByID")
            Dim dtUser As New DataTable
            dtUser = dt.Tables(0)
            If dtUser.Rows.Count > 0 Then
                Dim drLogin As DataRow
                drLogin = dtUser.Rows(0)
                If String.IsNullOrEmpty(drLogin("AccAddr_Name").ToString()) Then
                    lblnameship.Visible = False
                Else
                    lblnameship.Visible = True
                    lblnameship.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Name").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_Telephone").ToString()) Then
                    'lblcontacship.Visible = False
                Else
                    lblcontacship.Visible = True
                    lblcontacship.Text = "Phone:" + DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Telephone").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_Email").ToString()) Then
                    'lblcontacship.Visible = False
                Else
                    lblcontacship.Visible = True
                    lblcontacship.Text = " Email: " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Email").ToString())
                End If
                
                If String.IsNullOrEmpty(drLogin("AccAddr_Address").ToString()) Then
                    lbladdressShip.Visible = False
                Else
                    lbladdressShip.Visible = True
                    lbladdressShip.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Address").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_Pincode").ToString()) Then
                    lblpincodeship.Visible = False
                Else
                    lblpincodeship.Visible = True
                    lblpincodeship.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_Pincode").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("AccAddr_City").ToString()) Then
                    lblCityship.Visible = False
                Else
                    lblCityship.Visible = True
                    lblCityship.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("AccAddr_City").ToString())
                End If
                Dim country As Array = countrydt.Select("ID = '" + drLogin("AccAddr_Country").ToString() + "'")
                If country.Length <> 0 Then
                    lblcontryship.Text = country(0)(1).ToString + " "
                End If
                Dim state As Array = statedt.Select("ID = '" + drLogin("AccAddr_State").ToString() + "'")
                If state.Length <> 0 Then
                    lblstateship.Text = state(0)(1).ToString
                End If
            End If
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "FillShippingAddressDetail", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub Fillcompany()
        Try
            Dim dt As DataSet = MainBLL.ViewByID(hfCompanyid.Value, "CompanyViewByID")
            Dim dtFaq As New DataTable
            dtFaq = dt.Tables(0)
            Dim drFaqRow As DataRow
            drFaqRow = dtFaq.Rows(0)
            lblcompanyname.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_Name").ToString())
            lblcompanyaddress.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_Address").ToString())
            lblcompanyphone.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_Phone").ToString())
            lblcompanyemail.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_EmailId").ToString())
            lblcompanypan.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_PAN").ToString())
            lblcompanycin.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_VAT").ToString())
            lblcompanytin.Text = DynamicparcelDataManipulation.FixNullFromDB(drFaqRow("Company_CST").ToString())

imgheader.ImageUrl = "http://crm.swissbake.co.in/img/CompanyImage/040515040511-Swissbake_-Headerr-800X100-px_4-10-14.png"
            imgfooter.ImageUrl = "http://crm.swissbake.co.in/img/CompanyImage/040515040511-Swissbake_Footer-800X100-px_4-10-14.png"
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "Fillcompany", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub FillMainProduct()
        Try
            MainID = Security.Decrypt(HttpUtility.UrlDecode(Request.QueryString("Id")))
            grditemproduct.DataSource = OrderBLL.FillOrderDetail(MainID)
            grditemproduct.DataBind()
            If grditemproduct.Rows.Count > 0 Then
                Dim lttotalamount As Label = DirectCast(grditemproduct.FooterRow.FindControl("lttotalamount"), Label)
                Dim lttotalvat As Label = DirectCast(grditemproduct.FooterRow.FindControl("lttotalvat"), Label)
                Dim lblsubtotal As Label = DirectCast(grditemproduct.FooterRow.FindControl("lblsubtotal"), Label)
                Dim lblfreight As Label = DirectCast(grditemproduct.FooterRow.FindControl("lblfreight"), Label)
                Dim lbltotalkg As Label = DirectCast(grditemproduct.FooterRow.FindControl("lbltotalkg"), Label)

For i As Integer = 0 To grditemproduct.Rows.Count - 1
                    Dim ltamount As Label = DirectCast(grditemproduct.Rows(i).FindControl("ltamount"), Label)
                    Dim lblvatinrs As Label = DirectCast(grditemproduct.Rows(i).FindControl("lblvatinrs"), Label)
                    Dim hfPacking_Weight As HiddenField = DirectCast(grditemproduct.Rows(i).FindControl("hfPacking_Weight"), HiddenField)
                    Dim ltquantity As Label = DirectCast(grditemproduct.Rows(i).FindControl("ltquantity"), Label)
                    Dim ltkg As Label = DirectCast(grditemproduct.Rows(i).FindControl("ltkg"), Label)
                    ltkg.Text = CInt(hfPacking_Weight.Value) * CInt(ltquantity.Text)
                    TotalKg = TotalKg + Convert.ToInt32(ltkg.Text)
                    ltamount.Text = Math.Round(Convert.ToDouble(ltamount.Text)).ToString("N2")
                    lblvatinrs.Text = Math.Round(Convert.ToDouble(lblvatinrs.Text)).ToString("N2")
                    VatAmount = VatAmount + lblvatinrs.Text
                    FooterTotalAmount = FooterTotalAmount + ltamount.Text
                    ltamount.Text = CDbl(ltamount.Text).ToString("N2")
                    lblvatinrs.Text = CDbl(lblvatinrs.Text).ToString("N2")
                Next
                lbltotalkg.Text = TotalKg.ToString
                lblsubtotal.Text = Math.Round(FooterTotalAmount).ToString("N2")
                lblfreight.Text = Math.Round(Convert.ToDouble(hfFreight.Value)).ToString("N2")
                FooterTotalAmount = Math.Round(FooterTotalAmount + VatAmount + Convert.ToDouble(lblfreight.Text))
                lttotalamount.Text = FooterTotalAmount.ToString("N2")
                lttotalvat.Text = Math.Round(VatAmount).ToString("N2")
                lblamountword.Text = MainBLL.NumbersToWords(FooterTotalAmount) + " Only"
            End If

Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "FillMainProduct", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub FillfooterDetail()
        Try
            MainID = hfcustid.Value
            Dim dt As DataSet = MainBLL.ViewByID(MainID, "ACCTaxationDetail")
            Dim dtUser As New DataTable
            dtUser = dt.Tables(0)
            If dtUser.Rows.Count > 0 Then
                Dim drLogin As DataRow
                drLogin = dtUser.Rows(0)
                If String.IsNullOrEmpty(drLogin("Cust_Vat").ToString()) Then
                    'lblbyuervat.Visible = False
                Else
                    lblbyuervat.Visible = True
                    lblbyuervat.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Cust_Vat").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("Cust_Tin").ToString()) Then
                    'lblbyuervat.Visible = False
                Else
                    lblbyuervat.Visible = True
                    lblbyuervat.Text += " / " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("Cust_Tin").ToString())
                End If

If String.IsNullOrEmpty(drLogin("Cust_Pan").ToString()) Then
                    'lblbyuervat.Visible = False
                Else
                    lblbuyerpan.Visible = True
                    lblbuyerpan.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Cust_Pan").ToString())
                End If
            End If
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "FillfooterDetail", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub Fillowner()
        Try
            MainID = hfownerid.Value
            Dim dt As DataSet = MainBLL.ViewByID(MainID, "Orderownername")
            Dim dtUser As New DataTable
            dtUser = dt.Tables(0)
            If dtUser.Rows.Count > 0 Then
                Dim drLogin As DataRow
                drLogin = dtUser.Rows(0)
                If String.IsNullOrEmpty(drLogin("Owner").ToString()) Then
                    'lblownername.Visible = False
                Else
                    lblownername.Visible = True
                    lblownername.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Owner").ToString())
                End If

End If
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "Fillowner", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Public Sub FillPrimaryCont()
        Try
            MainID = hfcustid.Value
            Dim dt As DataSet = MainBLL.ViewByID(MainID, "AccountViewByID")
            Dim dtUser As New DataTable
            dtUser = dt.Tables(0)
            If dtUser.Rows.Count > 0 Then
                Dim drLogin As DataRow
                drLogin = dtUser.Rows(0)
                If String.IsNullOrEmpty(drLogin("Contact_ContactPerson").ToString()) Then
                    lblprimarycont.Visible = False
                Else
                    lblprimarycont.Visible = True
                    lblprimarycont.Text = "Kind Attn:" + DynamicparcelDataManipulation.FixNullFromDB(drLogin("Contact_ContactPerson").ToString()) + "<br/>"
                    lblbuyerref.Text = DynamicparcelDataManipulation.FixNullFromDB(drLogin("Contact_ContactPerson").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("Contact_Landline").ToString()) Then
                Else
                    lblprimarycont.Visible = True
                    lblprimarycont.Text += " Phone: " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("Contact_Landline").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("Contact_Mobile").ToString()) Then
                Else
                    lblprimarycont.Visible = True
                    lblprimarycont.Text += " Mobile: " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("Contact_Mobile").ToString())
                End If
                If String.IsNullOrEmpty(drLogin("Contact_Email").ToString()) Then
                Else
                    lblprimarycont.Visible = True
                    lblprimarycont.Text += " Email: " + DynamicparcelDataManipulation.FixNullFromDB(drLogin("Contact_Email").ToString())
                End If
            End If
        Catch ex As Exception
            Dim error1 As String = ex.Message.Replace(Chr(34), "")
            error1 = error1.Replace(Chr(39), "")
            ExecptionBLL.Insert("PrintSalesOrder", "FillPrimaryCont", error1, Session("UserId"))
            'ScriptManager.RegisterStartupScript(Page, Me.[GetType](), "Call", "alert('" + (error1.ToString).ToString + "')", True)
            Throw ex
        End Try
    End Sub

Private Sub sendordermail()
        Try
            Dim body As String = String.Empty
            Using sw As New StringWriter()
                Using hw As New HtmlTextWriter(sw)
                    printablediv.RenderControl(hw)
                    Dim sr As New StringReader(sw.ToString())
                    body = sw.ToString()
                End Using

End Using
            SendMailBLL.SendMail("gayatri.jathar@acaira.in", body, "New order has been placed (" + lblordercode.Text + ")")
            'SendMailBLL.SendMail("accounts@swissbake.co.in", body, "New order has been placed (" + lblordercode.Text + ")")
            Response.Redirect("SalesOrders.aspx")
        Catch ex As Exception
            Throw ex
        End Try
    End Sub

Public Overloads Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
        ' Verifies that the control is rendered 
    End Sub
End Class

Name	Type	Size	Owner/Group	Permission	Last Modified	Actions
.	dir	-	0/0	0777	2023-06-27 12:30:56
..	dir	-	0/0	0777	2024-11-04 03:34:05
Recipes	dir	-	0/0	0777	2016-01-28 03:20:26
UserControl	dir	-	0/0	0777	2015-10-21 04:45:20
images	dir	-	0/0	0777	2024-07-17 12:05:58
js	dir	-	0/0	0777	2015-10-10 06:32:12
js1	dir	-	0/0	0777	2015-06-24 11:54:47
rs-plugin	dir	-	0/0	0777	2015-06-24 11:54:47
Billing_address.aspx	text/html	21.46 KB	0/0	0666	2017-05-20 06:34:19
Billing_address.aspx.vb	text/plain	8.62 KB	0/0	0666	2017-05-20 06:34:19
Bundle.config	text/xml	815 B	0/0	0666	2016-01-01 04:22:34
Cancel_Policy.aspx	text/html	2.12 KB	0/0	0666	2017-05-20 06:34:29
Cancel_Policy.aspx.vb	text/plain	80 B	0/0	0666	2017-05-20 06:34:29
Cart.aspx	text/html	17.57 KB	0/0	0666	2017-05-22 02:59:24
Cart.aspx.vb	text/html	32.44 KB	0/0	0666	2017-05-20 06:34:16
Change_password.aspx	text/html	5.27 KB	0/0	0666	2017-05-20 06:34:29
Change_password.aspx.vb	text/plain	3.74 KB	0/0	0666	2017-05-20 06:34:25
Completed_Order.aspx	text/html	5.62 KB	0/0	0666	2017-05-20 06:34:18
Completed_Order.aspx.vb	text/plain	1.6 KB	0/0	0666	2017-05-20 06:34:29
Contact us Baking Products SwissBake.html	text/html	33.06 KB	0/0	0666	2016-01-01 04:22:26
Dashboard.aspx	text/html	23.83 KB	0/0	0666	2017-05-20 06:34:26
Dashboard.aspx.vb	text/plain	6.06 KB	0/0	0666	2017-05-20 06:34:16
DemoPage.aspx	text/plain	721 B	0/0	0666	2017-05-20 06:34:30
DemoPage.aspx.vb	text/plain	75 B	0/0	0666	2017-05-20 06:34:30
EmailSalesOrder.aspx	text/html	41.85 KB	0/0	0666	2017-05-20 06:34:30
EmailSalesOrder.aspx.vb	text/plain	23.14 KB	0/0	0666	2017-05-20 06:34:20
Feedback.aspx	text/html	5.99 KB	0/0	0666	2017-05-20 06:34:31
Feedback.aspx.vb	text/plain	2.34 KB	0/0	0666	2017-05-20 06:34:31
Forgot_Pass.aspx	text/html	8.96 KB	0/0	0666	2017-05-20 06:34:18
Forgot_Pass.aspx.vb	text/html	5.4 KB	0/0	0666	2017-05-20 06:34:18
Global.asax	text/html	3.1 KB	0/0	0666	2016-01-01 04:22:14
Login.aspx	text/html	16.79 KB	0/0	0666	2017-05-20 06:34:25
Login.aspx.vb	text/plain	5.25 KB	0/0	0666	2017-05-20 06:34:20
Logout.aspx	text/plain	339 B	0/0	0666	2017-05-20 06:34:31
Logout.aspx.vb	text/plain	303 B	0/0	0666	2017-05-20 06:34:31
MainMaster.master	text/html	23.28 KB	0/0	0666	2017-05-20 06:34:17
MainMaster.master.vb	text/plain	6.73 KB	0/0	0666	2017-05-20 06:34:17
MainProduct.aspx	text/html	1.38 KB	0/0	0666	2017-05-20 06:34:31
MainProduct.aspx.vb	text/plain	454 B	0/0	0666	2017-05-20 06:34:31
Main_Registration.aspx	text/html	8.83 KB	0/0	0666	2017-05-20 06:34:32
Main_Registration.aspx.vb	text/plain	546 B	0/0	0666	2017-05-20 06:34:32
Maintenance.html	text/html	2.3 KB	0/0	0666	2017-05-20 06:34:32
Mode_of_payment.aspx	text/html	2.61 KB	0/0	0666	2017-05-20 06:34:32
Mode_of_payment.aspx.vb	text/plain	952 B	0/0	0666	2017-05-20 06:34:32
MyOderDetailNew.aspx	text/html	6.94 KB	0/0	0666	2017-05-20 06:34:32
MyOderDetailNew.aspx.vb	text/plain	2.31 KB	0/0	0666	2017-05-20 06:34:33
MyOrderDetails.aspx	text/html	5.66 KB	0/0	0666	2017-05-20 06:34:18
MyOrderDetails.aspx.vb	text/plain	1.76 KB	0/0	0666	2017-05-20 06:34:18
MyWebService.asmx	text/plain	97 B	0/0	0666	2017-05-20 06:34:29
Order.aspx	text/html	15.75 KB	0/0	0666	2017-05-20 06:34:21
Order.aspx.vb	text/plain	16.58 KB	0/0	0666	2017-05-20 06:34:28
Parcel_Details.aspx	text/html	3.21 KB	0/0	0666	2017-05-20 06:34:33
Parcel_Details.aspx.vb	text/plain	13.97 KB	0/0	0666	2017-05-20 06:34:33
Parcel_Details1.aspx	text/html	3.92 KB	0/0	0666	2017-05-20 06:34:33
Parcel_Details1.aspx.vb	text/plain	16.63 KB	0/0	0666	2017-05-20 06:34:33
PayFailure.aspx	text/plain	1.22 KB	0/0	0666	2017-05-20 06:34:26
PayFailure.aspx.vb	text/plain	1.38 KB	0/0	0666	2017-05-20 06:34:26
PayFailure1.aspx	text/html	5.25 KB	0/0	0666	2017-05-20 06:34:26
PayFailure1.aspx.vb	text/plain	6.91 KB	0/0	0666	2017-05-20 06:34:26
PayNow.aspx	text/html	5.67 KB	0/0	0666	2017-05-20 06:34:26
PayNow.aspx.vb	text/plain	6.94 KB	0/0	0666	2017-05-20 06:34:16
PaySuccess.aspx	text/html	985 B	0/0	0666	2017-05-20 06:34:27
PaySuccess.aspx.vb	text/plain	1.43 KB	0/0	0666	2017-05-20 06:34:27
PaySucess.aspx	text/plain	752 B	0/0	0666	2017-05-20 06:34:39
PaySucess.aspx.vb	text/plain	1.43 KB	0/0	0666	2017-05-20 06:34:39
PaySucess1.aspx	text/html	605 B	0/0	0666	2017-05-20 06:34:34
PaySucess1.aspx.vb	text/plain	76 B	0/0	0666	2017-05-20 06:34:34
Pending_Order.aspx	text/html	5.63 KB	0/0	0666	2017-05-20 06:34:25
Pending_Order.aspx.vb	text/plain	1.59 KB	0/0	0666	2017-05-20 06:34:34
Place_order.aspx	text/html	17.56 KB	0/0	0666	2017-05-20 06:34:14
Place_order.aspx.vb	text/plain	19.68 KB	0/0	0666	2017-05-20 06:34:14
PrintInvoice.aspx	text/html	51.97 KB	0/0	0666	2017-05-20 06:34:22
PrintInvoice.aspx.vb	text/plain	26.07 KB	0/0	0666	2017-05-20 06:34:23
PrintInvoice1.aspx	text/html	31.18 KB	0/0	0666	2017-05-20 06:34:24
PrintInvoice1.aspx.vb	text/plain	13.87 KB	0/0	0666	2017-05-20 06:34:28
PrintOrder.aspx	text/html	14.51 KB	0/0	0666	2017-05-20 06:34:20
PrintOrder.aspx.vb	text/plain	12.74 KB	0/0	0666	2017-05-20 06:34:34
PrintSalesOrder.aspx	text/html	48.61 KB	0/0	0666	2017-05-20 06:34:23
PrintSalesOrder.aspx.exclude	text/html	26.23 KB	0/0	0666	2017-05-20 06:34:27
PrintSalesOrder.aspx.vb	text/plain	27.8 KB	0/0	0666	2017-05-20 06:34:22
PrintSalesOrder.aspx.vb.exclude	text/plain	22.29 KB	0/0	0666	2017-05-20 06:34:28
Privacy_policy.aspx	text/html	8.41 KB	0/0	0666	2017-05-20 06:34:35
Privacy_policy.aspx.vb	text/plain	81 B	0/0	0666	2017-05-20 06:34:35
Profile.aspx	text/html	8.13 KB	0/0	0666	2017-05-20 06:34:35
Profile.aspx.vb	text/html	7.64 KB	0/0	0666	2017-05-20 06:34:20
Quick_Order.aspx	text/html	6.98 KB	0/0	0666	2017-05-20 06:34:36
Quick_Order.aspx.vb	text/plain	9.91 KB	0/0	0666	2017-05-20 06:34:35
ReOrder.aspx	text/html	6.3 KB	0/0	0666	2017-05-20 06:34:18
ReOrder.aspx.vb	text/plain	9.33 KB	0/0	0666	2017-05-20 06:34:17
RecentOrder.aspx	text/html	15.98 KB	0/0	0666	2017-05-20 06:34:24
RecentOrder.aspx.vb	text/plain	16.73 KB	0/0	0666	2017-05-20 06:34:29
Recipes.aspx	text/plain	617 B	0/0	0666	2017-05-20 06:34:36
Recipes.aspx.vb	text/plain	74 B	0/0	0666	2017-05-20 06:34:36
Register.aspx	text/html	59.41 KB	0/0	0666	2017-05-20 06:34:15
Register.aspx.vb	text/plain	14.59 KB	0/0	0666	2017-05-20 06:34:19
Registration.aspx	text/plain	3.12 KB	0/0	0666	2017-05-20 06:34:36
Registration.aspx.vb	text/plain	1.05 KB	0/0	0666	2017-05-20 06:34:36
Shipping.aspx	text/html	327 B	0/0	0666	2017-05-20 06:34:37
Shipping.aspx.vb	text/plain	33.38 KB	0/0	0666	2017-05-20 06:34:37
Shipping_Policy.aspx	text/html	2.55 KB	0/0	0666	2017-05-20 06:34:28
Shipping_Policy.aspx.vb	text/plain	82 B	0/0	0666	2017-05-20 06:34:38
Shipping_address.aspx	text/html	10.12 KB	0/0	0666	2017-05-20 06:34:37
Shipping_address.aspx.vb	text/plain	4.73 KB	0/0	0666	2017-05-20 06:34:38
Support_Ticket.aspx	text/html	6.5 KB	0/0	0666	2017-05-20 06:34:24
Support_Ticket.aspx.vb	text/plain	5.85 KB	0/0	0666	2017-05-20 06:34:25
Taxation_details.aspx	text/html	5.2 KB	0/0	0666	2017-05-20 06:34:28
Taxation_details.aspx.vb	text/plain	2.84 KB	0/0	0666	2017-05-20 06:34:38
Terms.aspx	text/html	4.71 KB	0/0	0666	2017-05-20 06:34:38
Terms.aspx.vb	text/plain	72 B	0/0	0666	2017-05-20 06:34:38
TestEmail.aspx	text/html	686 B	0/0	0666	2017-05-20 06:34:38
TestEmail.aspx.vb	text/plain	2.11 KB	0/0	0666	2017-05-20 06:34:38
Ticket_Histroy.aspx	text/html	5.85 KB	0/0	0666	2017-05-20 06:34:38
Ticket_Histroy.aspx.vb	text/plain	1.34 KB	0/0	0666	2017-05-20 06:34:39
Ticket_View.aspx	text/html	9.01 KB	0/0	0666	2017-05-20 06:34:25
Ticket_View.aspx.vb	text/plain	5.68 KB	0/0	0666	2017-05-20 06:34:25
Track.aspx	text/html	479 B	0/0	0666	2017-05-20 06:34:39
Track.aspx.vb	text/plain	12.09 KB	0/0	0666	2017-05-20 06:34:39
Track_Parcel.aspx	text/html	2.64 KB	0/0	0666	2017-05-20 06:34:39
Track_Parcel.aspx.vb	text/html	706 B	0/0	0666	2017-05-20 06:34:27
Web.Debug.config	text/xml	1.33 KB	0/0	0666	2015-06-24 10:38:44
Web.sitemap	text/xml	815 B	0/0	0666	2016-01-01 04:20:24
app_offline.htm	text/html	3.16 KB	0/0	0666	2017-05-27 10:29:33
demo.aspx	text/html	1.51 KB	0/0	0666	2017-05-20 06:34:29
demo.aspx.vb	text/plain	1.89 KB	0/0	0666	2017-05-20 06:34:30
google57c016e79b84fdf3.html	text/plain	53 B	0/0	0666	2016-01-01 04:22:14
index.aspx	text/plain	339 B	0/0	0666	2017-05-20 06:34:31
index.aspx.vb	text/plain	205 B	0/0	0666	2017-05-20 06:34:31
index.html	text/html	463 B	0/0	0666	2016-05-13 11:57:11
logos.jpg	image/jpeg	111.55 KB	0/0	0666	2016-05-13 11:57:14
myinvoice.aspx	text/html	6.68 KB	0/0	0666	2017-05-20 06:34:21
myinvoice.aspx.vb	text/plain	1.83 KB	0/0	0666	2017-05-20 06:34:20
packages.config	text/xml	148 B	0/0	0666	2016-01-01 04:21:54
paymentdetails.aspx	text/html	3.67 KB	0/0	0666	2017-05-20 06:34:33
paymentdetails.aspx.vb	text/plain	1.28 KB	0/0	0666	2017-05-20 06:34:34
paymentpolicy.aspx	text/html	998 B	0/0	0666	2017-05-20 06:34:34
paymentpolicy.aspx.vb	text/plain	80 B	0/0	0666	2017-05-20 06:34:34
web.config	text/xml	3.52 KB	0/0	0666	2024-12-14 01:14:34

Team Anon Force

https://t.me/Professor6T9x