• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 174
  • Last Modified:

table programatically

' If I have the cartid as static like. "38400d3a-9451-41b1-b1d6-5910073af288" then my data shows up.
        ' But when I try to delcare it I see no data. this has droven me banannas. Please
        ' if anyone sees anything that I cannot see or should work .

prm = New SqlParameter("@CartID", SqlDbType.Char, 36)
        prm.Direction = ParameterDirection.Input
        prm.Value = CartID "38400d3a-9451-41b1-b1d6-5910073af288"
        cmd.Parameters.Add(prm)

Dim Header(100, 5)
        Dim hWeek As Integer = 0
        Dim hDept As String = ""
        Dim widx As Integer = -1
 
        Dim conn As New SqlConnection(Application("A1SConnString"))
        Dim cmd As SqlCommand
        Dim prm As SqlParameter
        cmd = New SqlCommand("GetShoppingCartProducts", conn)
 
        Dim c As TableCell
        Dim r As TableRow
        '-----------------------------------------------
 
        Dim CartID As Char
        ''I have a table I am programatically showing. The problem is passing the Parameter for cartid. 
        
        prm = New SqlParameter("@CartID", SqlDbType.Char, 36)
        prm.Direction = ParameterDirection.Input
        prm.Value = "38400d3a-9451-41b1-b1d6-5910073af288"
        cmd.Parameters.Add(prm)
 
        cmd.CommandType = CommandType.StoredProcedure
        cmd.CommandTimeout = 120 'Number of seconds to wait for a response.
 
        Dim sqlDR As SqlDataReader
        conn.Open()
        sqlDR = cmd.ExecuteReader(CommandBehavior.Default)

Open in new window

0
Seven price
Asked:
Seven price
  • 5
  • 3
3 Solutions
 
Hitesh ManglaniCommented:
hi, u have mentioned
 prm.Value = CartID "38400d3a-9451-41b1-b1d6-5910073af288"
 are u appending CartId to 38400d3a-9451-41b1-b1d6-5910073af288 ?
if yes then i thing u need 37 chars and u need to change
prm = New SqlParameter("@CartID", SqlDbType.Char, 36) to
prm = New SqlParameter("@CartID", SqlDbType.Char, 37)

Let me know if this helps
 
0
 
Seven priceFull StackAuthor Commented:
Sorry that did not work. So weird , maybe you think it is the way i delcared it.

 Dim CartID As Integer

I have no idea.
0
 
Hitesh ManglaniCommented:
to be frank u i did not understand the use of CartId in the following statement
prm.Value = CartID "38400d3a-9451-41b1-b1d6-5910073af288"
0
Upgrade your Question Security!

Your question, your audience. Choose who sees your identity—and your question—with question security.

 
Seven priceFull StackAuthor Commented:
Do i suppose to change what i have to what you have. Not using the cmd

Dim CartID As Integer
        prm = cmd.Parameters.Add("@CartID", SqlDbType.Char, 36)
        prm.Value = CartID
        
 
 
 Dim CartID As Integer
        prm = New SqlParameter("@CartID", SqlDbType.Char, 36)
        prm.Value = CartID

Open in new window

0
 
Seven priceFull StackAuthor Commented:
Well the cartid is passed to another table one the user add to cart. this is a cookie that is inside the user machine. and the userid. I am just trying to pull the information to the table. I know this work because I done this by binding but for this particular problem i have to do this programatically.
0
 
Seven priceFull StackAuthor Commented:
even tryied this way.

Dim prm As New SqlParameter("@CartID", SqlDbType.Char, 36)
        cmd.CommandType = CommandType.StoredProcedure
        prm.Value = CartID
        cmd.Parameters.Add(prm)

Open in new window

0
 
Hitesh ManglaniCommented:
u have used
prm.Value = CartID

what is the value of CartId?, where are you assigning a value to it?
0
 
Seven priceFull StackAuthor Commented:
I fix it I had to change the stored procedure to @cartid  to cartid
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Cloud Class® Course: Microsoft Azure 2017

Azure has a changed a lot since it was originally introduce by adding new services and features. Do you know everything you need to about Azure? This course will teach you about the Azure App Service, monitoring and application insights, DevOps, and Team Services.

  • 5
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now