Απ: Re: Πρόβλημα με FileUpload + FormView

epp1123 — Mon, 26 May 2008 23:22:26 GMT

Ναι αυτό ήταν. Το είχα μπροστά μου και δεν το έβλεπα! Ευχαριστώ πάντως. Τώρα έχω άλλο λάθος. Μου λέει ότι το IdentTitle είναι null. Υπάρχει καμιά συνάρτηση που μπορώ να πάρω το περιεχόμενο του control που είναι μέσα στο FormView?

Re: Πρόβλημα με FileUpload + FormView

Oldgeorge — Mon, 26 May 2008 23:04:14 GMT

Με μια γρήγορη ματιά φαίνεται ότι δεν έχεις κανει add 2 από τα 3 parameters που βάζεις στο updatecommand σου. Το μήνυμα λάθους είναι ακριβώς ότι λέει, δηλαδή δεν βρίσκει ο parser την παράμετρο τύπου scalar που περιμένει. Πρόσθεσε τα

SuppliersSqlDataSource.UpdateParameters.Add(IdentTitleParameter)

SuppliersSqlDataSource.UpdateParameters.Add(WebSiteParameter)

και τουλάχιστον αυτό το λάθος θα πάψει να σε ενοχλεί :) Δεν ξέρω αν το υπόλοιπο δουλεύει όπως είναι, δεν προλαβαίνω να το κοιτάξω με λεπτομέρεια.

Πρόβλημα με FileUpload + FormView

epp1123 — Mon, 26 May 2008 22:12:11 GMT

Η ιστορία έχει ως εξής:

Έχω τοποθετήσει ένα FileUpload μέσα σε ένα FormView, το οποίο θα το χρησιμοποιώ σε Edit και Insert Modes (της FormView). Αφού έψαξα, βρήκα πως δεν μπορείς να έχεις άμεσα πρόσβαση στο control που βρίσκεται μέσα στο FormView, και πρέπει να το κάνεις με FindControl. Έτσι, χωρίς να γνωρίζω και πολλά πό VB, αλλά δε πειράζει μαθαίνω , έκατσα έγραψα κώδικα για να ανανεώνω (Update) αρχικά τη βάση. Όλα καλά και όλα ωραία, αλλά έχω το εξής πρόβλημα -->"Must declare the scalar variable "@IdentTitleParameter". Εκτός από τη συμβουλή σας για την επίλυση του προβλήματος, θα ήθελα και μία εξήγηση τι στο καλό σημαίνει το "Must declare the scalar variable ".

Arigato

 'Ορισμός Μεταβλητών
    Dim TempFileUpload As New FileUpload
    Dim TempIdentTitle As New TextBox
    Dim TempWebSite As New TextBox
    Dim ClientSideFileName As String
    Dim ServerSideFilePath As String
    
    Dim FileUploadParameter As New Parameter
    Dim IdentTitleParameter As New Parameter
    Dim WebSiteParameter As New Parameter
    
    'Η Sub του FileUpload Server Control
    Protected Sub SuppliersLogoUpload_DataBinding(ByVal sender As Object, ByVal e As System.EventArgs)
        'Βρίσκουμε τα control
        If SuppliersFormView.CurrentMode = FormViewMode.Edit Then
            TempFileUpload = SuppliersFormView.FindControl("SuppliersLogoUpload")
            TempIdentTitle = SuppliersFormView.FindControl("IdentTitleTextBox")
            TempWebSite = SuppliersFormView.FindControl("WeblinkTextBox")
        End If
       
        
    End Sub
    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''     
    
    Protected Sub UpdateButton_Click(ByVal sender As Object, ByVal e As System.EventArgs)
        
        'Διαδικασία ανεβάσματος του αρχείου στη βάση
        
        ServerSideFilePath = "C:\" 'Ορίζουμε το path του server
        If TempFileUpload.HasFile Then
            'Παίρνουμε το όνομα του αρχείου που βρίσκεται στον client
            ClientSideFileName = TempFileUpload.PostedFile.FileName
            
            'Καθορίζουμε το path που θα αποθηκευτεί το αρχείο + το όνομα του αρχείου
            ServerSideFilePath = ServerSideFilePath + ClientSideFileName
            
            'Ανεβάζουμε το αρχείο στο server
            TempFileUpload.SaveAs(ServerSideFilePath)
            
        End If
        ''''''''''''''''''''''''''''''''''''''''
        
        'Διαδικασία εισαγωγής του path στη βάση
        
        'Ορίζουμε τα δεδομένα των παραμέτρων
        
        ' Το logo του προμηθευτή
        FileUploadParameter.DefaultValue = ServerSideFilePath
        FileUploadParameter.Name = "FileUploadParameter"
        FileUploadParameter.Type = TypeCode.String
        
        ' Το όνομα της εταιρείας του προμηθευτή
        IdentTitleParameter.DefaultValue = TempIdentTitle.Text
        IdentTitleParameter.Name = "IdentTitleParameter"
        IdentTitleParameter.Type = TypeCode.String
        
        
        ' Η ιστοσελίδα του προμηθευτή
        WebSiteParameter.DefaultValue = TempWebSite.Text
        WebSiteParameter.Name = "WebSiteParameter"
        WebSiteParameter.Type = TypeCode.String
        
        'Κάνουμε την ανανέωση
        SuppliersSqlDataSource.UpdateParameters.Add(FileUploadParameter)
        SuppliersSqlDataSource.UpdateCommand = "UPDATE Suppliers SET Logo =@FileUploadParameter, IdentTitle =@IdentTitleParameter, Weblink =@WebSiteParameter"
        SuppliersSqlDataSource.Update()

Πρώτα Βήματα - Web Development

Απ: Re: Πρόβλημα με FileUpload + FormView

Re: Πρόβλημα με FileUpload + FormView

Πρόβλημα με FileUpload + FormView