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 includes_ftp_settings_inc
    Inherits System.Web.UI.UserControl
    'Private _userPI As UserPI
    Private _webWS As New WebWS
    Private _commonFunctions As CommonFunctions = New CommonFunctions()
    Private _user As MembershipUser
    Private _userProfile As ProfileCommon

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

        Me.Page.DataBind()

        '_userPI = New UserPI(Profile.StoreId)

        If Session("EditUserFromAdmin") = True Then
            Dim _guid = New Guid(Request.QueryString("uid"))
            _user = Membership.GetUser(_guid)
        Else
            _user = Membership.GetUser()
        End If

        _userProfile = Profile.GetProfile(_user.UserName)

        If Not Page.IsPostBack Then
            Dim _dataSet As New System.Data.DataSet
            _dataSet = _webWS.GetFtpSettingsByStoreId(_userProfile.StoreId)
            HostNameTextBox.Text = _dataSet.Tables(0).Rows(0).Item("HostName")
            PortTextBox.Text = _dataSet.Tables(0).Rows(0).Item("Port")
            UserNameSetTextBox.Text = _dataSet.Tables(0).Rows(0).Item("UserName")
            PasswordSetTextBox.Text = _dataSet.Tables(0).Rows(0).Item("Password")
            PathTextBox.Text = _dataSet.Tables(0).Rows(0).Item("Path")
            IsPASVCheckBox.Checked = _dataSet.Tables(0).Rows(0).Item("IsPASV")
        End If

        If Session("EditUserFromAdmin") = True Then
            BreakTR.Visible = True
        End If
    End Sub

    Protected Sub UpdateImageButton_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles UpdateImageButton.Click
        If Session("EditUserFromAdmin") = True Then
            Dim _guid = New Guid(Request.QueryString("uid"))
            _user = Membership.GetUser(_guid)
        Else
            _user = Membership.GetUser()
        End If

        _userProfile = Profile.GetProfile(_user.UserName)

        Dim _resultMessage As String = ""
        If Page.IsValid = True Then
            Try
                _webWS.UpdateFtpSettingsByStoreId(_userProfile.StoreId, HostNameTextBox.Text, PortTextBox.Text, UserNameSetTextBox.Text, _
                            PasswordSetTextBox.Text, PathTextBox.Text, IsPASVCheckBox.Checked)
                _resultMessage = "FTP Settings have been updated successfully"
            Catch ex As Exception
                _resultMessage = "Unable to update FTP Settings due to the following reason: <br/>" & ex.Message.ToString()
            End Try

            If Session("EditUserFromAdmin") = True Then

            Else
                CompleteFormDiv.Visible = False
                ResultDiv.Visible = True
                ResultLabel.Text = _resultMessage
                Try
                    Dim _headTag As New HtmlGenericControl
                    _headTag = CType(Me.Page.Master.FindControl("MasterHeadTag"), HtmlGenericControl)
                    Dim _metaRefreshTag As LiteralControl = New LiteralControl(_commonFunctions.MetaTag("ftp_settings.aspx"))
                    _headTag.Controls.Add(_metaRefreshTag)
                Catch ex As Exception
                End Try
            End If

        End If
    End Sub

    Protected Sub CancelImageButton_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles CancelImageButton.Click
        If Session("EditUserFromAdmin") = True Then
            Dim _guid = New Guid(Request.QueryString("uid"))
            _user = Membership.GetUser(_guid)
        Else
            _user = Membership.GetUser()
        End If

        _userProfile = Profile.GetProfile(_user.UserName)
        Dim _dataSet As New System.Data.DataSet
        _dataSet = _webWS.GetFtpSettingsByStoreId(_userProfile.StoreId)
        HostNameTextBox.Text = _dataSet.Tables(0).Rows(0).Item("HostName")
        PortTextBox.Text = _dataSet.Tables(0).Rows(0).Item("Port")
        UserNameSetTextBox.Text = _dataSet.Tables(0).Rows(0).Item("UserName")
        PasswordSetTextBox.Text = _dataSet.Tables(0).Rows(0).Item("Password")
        PathTextBox.Text = _dataSet.Tables(0).Rows(0).Item("Path")
        IsPASVCheckBox.Checked = _dataSet.Tables(0).Rows(0).Item("IsPASV")
    End Sub
End Class