Solved

table programatically

Posted on 2009-03-30
8
157 Views
Last Modified: 2012-05-06
' 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
Comment
Question by:sevensnake77
  • 5
  • 3
8 Comments
 
LVL 13

Accepted Solution

by:
hiteshgoldeneye earned 500 total points
ID: 24026949
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
 
LVL 9

Author Comment

by:sevensnake77
ID: 24028623
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
 
LVL 13

Assisted Solution

by:hiteshgoldeneye
hiteshgoldeneye earned 500 total points
ID: 24028822
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
Gigs: Get Your Project Delivered by an Expert

Select from freelancers specializing in everything from database administration to programming, who have proven themselves as experts in their field. Hire the best, collaborate easily, pay securely and get projects done right.

 
LVL 9

Author Comment

by:sevensnake77
ID: 24028907
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
 
LVL 9

Author Comment

by:sevensnake77
ID: 24028923
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
 
LVL 9

Author Comment

by:sevensnake77
ID: 24029018
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
 
LVL 13

Assisted Solution

by:hiteshgoldeneye
hiteshgoldeneye earned 500 total points
ID: 24029042
u have used
prm.Value = CartID

what is the value of CartId?, where are you assigning a value to it?
0
 
LVL 9

Author Comment

by:sevensnake77
ID: 24029133
I fix it I had to change the stored procedure to @cartid  to cartid
0

Featured Post

Live: Real-Time Solutions, Start Here

Receive instant 1:1 support from technology experts, using our real-time conversation and whiteboard interface. Your first 5 minutes are always free.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
Reading the Contents of a Directory In Access VBA 5 68
WPF issue with Trigger 2 106
Add a task in Outlook from access 11 39
Why is "packages element is not declared"? 2 213
When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
I was working on a PowerPoint add-in the other day and a client asked me "can you implement a feature which processes a chart when it's pasted into a slide from another deck?". It got me wondering how to hook into built-in ribbon events in Office.
Show developers how to use a criteria form to limit the data that appears on an Access report. It is a common requirement that users can specify the criteria for a report at runtime. The easiest way to accomplish this is using a criteria form that a…
This is Part 3 in a 3-part series on Experts Exchange to discuss error handling in VBA code written for Excel. Part 1 of this series discussed basic error handling code using VBA. http://www.experts-exchange.com/videos/1478/Excel-Error-Handlin…

776 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question