Current Directory:
                \\10.5.0.10\iis\Sites\goprint2.com\www\
            
            

                Contents:
                Directories:
App_Code
App_Data
App_GlobalResources
App_LocalResources
App_WebReferences
articles
aspnet_client
Bin
common
designer
dillners
images
img
includes
kwikkopy
order_centre
printthree
RadControls
update
WebServices
Files:
about_us.aspx | Download
about_us.aspx.vb | Download
contact_us.aspx | Download
contact_us.aspx.vb | Download
create_user.aspx | Download
create_user.aspx.vb | Download
Default.aspx | Download
Default.aspx.vb | Download
discount.aspx | Download
discount.aspx.vb | Download
domain_activation.aspx | Download
domain_activation.aspx.vb | Download
downloadPD.aspx | Download
downloadPD.aspx.vb | Download
download_error.aspx | Download
download_error.aspx.vb | Download
email_policy.aspx | Download
email_policy.aspx.vb | Download
error_page.aspx | Download
error_page.aspx.vb | Download
faq.aspx | Download
faq.aspx.vb | Download
favicon.ico | Download
FileNotFound.htm | Download
generate_print_driver_step1.aspx | Download
generate_print_driver_step1.aspx.vb | Download
generate_print_driver_step2.aspx | Download
generate_print_driver_step2.aspx.vb | Download
generate_print_driver_step3.aspx | Download
generate_print_driver_step3.aspx.vb | Download
Global.asax | Download
header.fla | Download
header.swf | Download
home.aspx | Download
home.aspx.vb | Download
jsincluding.js | Download
login.aspx | Download
login.aspx.vb | Download
marcelito.txt | Download
packages.aspx | Download
packages.aspx.vb | Download
password_recovery.aspx | Download
password_recovery.aspx.vb | Download
PrintIt.master | Download
PrintIt.master.vb | Download
PrintIt.sitemap | Download
PrintItEs.sitemap | Download
PrintItFr.sitemap | Download
PrintIt_CreateUser.master | Download
PrintIt_CreateUser.master.vb | Download
PrintIt_OutSide.master | Download
PrintIt_OutSide.master.vb | Download
privacy_policy.aspx | Download
privacy_policy.aspx.vb | Download
proba.aspx | Download
proba.aspx.vb | Download
robots.txt | Download
sample.txt | Download
show_sess_par.aspx | Download
show_sess_par.aspx.vb | Download
site_map.aspx | Download
site_map.aspx.vb | Download
site_map.xml | Download
sRacadUploader.jar | Download
sRacadUploader_last.jar | Download
terms_and_conditions.aspx | Download
terms_and_conditions.aspx.vb | Download
terms_of_service.aspx | Download
terms_of_service.aspx.vb | Download
test.txt | Download
testimonials.aspx | Download
testimonials.aspx.vb | Download
TextDraw.html | Download
udraw-designer-widescreen-ui.zip | Download
web.config | Download
websites-for-printers.aspx | Download
websites-for-printers.aspx.vb | Download

            
            

                File Preview:
                
Partial Class contact_us
    Inherits System.Web.UI.Page
    Protected _commonFunctions As CommonFunctions = New CommonFunctions()
    Public _selectedLanguage As String = ""

    Protected Overrides Sub InitializeCulture()

        If Request.QueryString("lang") IsNot Nothing Then
            _selectedLanguage = Request.QueryString("lang").ToString
        Else
            If Session("lang") IsNot Nothing Then
                _selectedLanguage = Session("lang").ToString
            Else
                If Request.Cookies("lang") IsNot Nothing Then
                    _selectedLanguage = Request.Cookies("lang").Value.ToString
                End If
            End If
        End If

        Session("lang") = _selectedLanguage

        If String.IsNullOrEmpty(_selectedLanguage) = False Then
            Me.UICulture = _selectedLanguage
            Me.Culture = Global.Resources.Resource.ResourceManager.GetString(_selectedLanguage)

            System.Threading.Thread.CurrentThread.CurrentUICulture = New System.Globalization.CultureInfo(_selectedLanguage)
            System.Threading.Thread.CurrentThread.CurrentCulture = System.Globalization.CultureInfo.CreateSpecificCulture(Global.Resources.Resource.ResourceManager.GetString(_selectedLanguage))
        End If

        MyBase.InitializeCulture()
    End Sub

    Protected Sub SubmitButton_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles SubmitButton.Click

        If Page.IsValid = True Then
            FailedResult.Visible = False
            SuccessResult.Visible = False

            Dim _from As String = "support@goprint2.com"
            Dim _to As String = "support@goprint2.com"
            '_to = "maria@edeninteractive.com"
            Dim _subject As String = NameTextBox.Text & " submitted contact information from GoPrint2 web site."
            Dim _body As String = "Name: " & NameTextBox.Text & "<br/>" & _
                        "Company Name: " & CompanyNameTextBox.Text & "<br/>" & _
                        "Business Type: " & BusinessTypeTextBox.Text & "<br/>" & _
                        "Address: " & AddressTextBox.Text & "<br/>" & _
                        "Phone Number: " & PhoneTextBox.Text & "<br/>" & _
                        "Email Address: " & EmailTextBox.Text & "<br/>" & _
                        "Message: " & MessageTextBox.Text & "<br/>"
            Try
                If com.racadtech.Framework.Util.Mail.SMTPClient.sendMail(New String() {_to}, _
                                                                      _subject, _body, True, _
                                                                      _from) = True Then
                    SuccessResult.Visible = True
                Else
                    FailedResult.Visible = True
                End If
            Catch ex As Exception
            End Try
        End If
        NameTextBox.Text = ""
        CompanyNameTextBox.Text = ""
        BusinessTypeTextBox.Text = ""
        AddressTextBox.Text = ""
        PhoneTextBox.Text = ""
        EmailTextBox.Text = ""
        MessageTextBox.Text = ""
    End Sub

    Protected Sub CancelButton_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles CancelButton.Click
        NameTextBox.Text = ""
        CompanyNameTextBox.Text = ""
        BusinessTypeTextBox.Text = ""
        AddressTextBox.Text = ""
        PhoneTextBox.Text = ""
        EmailTextBox.Text = ""
        SuccessResult.Visible = False
        FailedResult.Visible = False
    End Sub
End Class