Quantcast
Channel: ASP.NET AJAX + Ajax Control Toolkit (ACT)
Viewing all articles
Browse latest Browse all 5678

Ajax upload not executing sql command

$
0
0
Imports System.Data.SqlClient
Imports System.Web.Configuration
Imports System.Data
Imports System.IO
Imports System.Net
Imports System.Web.Script.Serialization
Partial Class Seller_Picture
    Inherits System.Web.UI.Page
    Private ReadOnly _start As String
    Dim temps As Integer
    Public Sub New()
        _start = WebConfigurationManager.ConnectionStrings("VirgoPlaza").ConnectionString
    End Sub
    Dim ItemID As Integer
    Protected Sub AjaxFileUpload1_UploadComplete(ByVal sender As Object, ByVal e As AjaxControlToolkit.AjaxFileUploadEventArgs) Handles AjaxFileUpload1.UploadComplete
        ' Getting the File Name
        Dim filename As String = e.FileName

        ' Setting the path to upload Images

        AjaxFileUpload1.SaveAs(Server.MapPath("images/") & filename)

        ' Storing the relative path to store into images
        Dim Imagepath As String = "~/images/" & filename
        Using conss As New SqlConnection(_start)
            conss.Open()
            Dim sql2 As String = "Select AuctionID from Auction INNER JOIN Item ON Auction.ItemID = Item.ItemID Where Item.Name=@name "
            Dim myCommand12 = New SqlCommand(sql2, conss)
            myCommand12.Parameters.AddWithValue("@name", dbItem.SelectedItem.Text)
            myCommand12.CommandType = CommandType.Text
            Dim auctionid As Integer = Convert.ToInt32(myCommand12.ExecuteScalar)


            Dim sql1 As String = "INSERT INTO Images (Image,AuctionID) VALUES (@image,@Auction)"
            Dim myCommand1 = New SqlCommand(sql1, conss)

            myCommand1.Parameters.AddWithValue("@image", Imagepath)
            myCommand1.Parameters.AddWithValue("@Auction", auctionid)
            myCommand1.ExecuteNonQuery()

            Dim sql3 As String = "UPDATE Item SET Status =@stat FROM Item INNER JOIN Auction ON Item.ItemID = Auction.ItemID Where Auction.Auction = @auction"
            Dim mycomand = New SqlCommand(sql3, conss)
            mycomand.Parameters.AddWithValue("@auction", auctionid)
            mycomand.Parameters.AddWithValue("@stat", "Auctionned")
            mycomand.ExecuteNonQuery()

            Dim sql4 As String = "Update Auction Set Status =@status where AuctionID =@auction"
            Dim mycommand = New SqlCommand(sql4, conss)
            Dim status As String = "Not Valid"
            mycommand.Parameters.AddWithValue("@status", status)
            mycommand.Parameters.AddWithValue("@auction", auctionid)
            mycommand.ExecuteNonQuery()
        End Using

    End Sub

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

        If Not Page.IsPostBack Then
            Using con1 As New SqlConnection(_start)


                Dim sql1 As String = "SELECT Item.ItemID, Item.Name FROM Item INNER JOIN Auction ON Item.ItemID = Auction.ItemID INNER JOIN Seller ON Item.SellerID = Seller.SellerID INNER JOIN Member ON Seller.MemberID = Member.MemberID WHERE(Member.Username = @username) AND (Item.Status = 'Photo')"

                con1.Open()

                Dim myCommand1 As New SqlCommand(sql1, con1)
                myCommand1.Parameters.AddWithValue("@username", Session("user"))
                myCommand1.CommandType = CommandType.Text

                Dim item As SqlDataReader
                item = myCommand1.ExecuteReader()
                myCommand1.Parameters.AddWithValue("@username", item)


                dbItem.DataSource = item
                dbItem.DataBind()
                con1.Close()



            End Using
        End If
    End Sub
End Class

Can anyone help i don't why but my ajax fileupload don't excute my command


Viewing all articles
Browse latest Browse all 5678

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>