Visual Basic Programming
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsProgrammingVisual Basic Programming

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
  #1  
Old December 18th, 2007, 05:37 AM
elenton elenton is offline
Contributing User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Apr 2005
Posts: 303 elenton User rank is Corporal (100 - 500 Reputation Level)elenton User rank is Corporal (100 - 500 Reputation Level)elenton User rank is Corporal (100 - 500 Reputation Level)elenton User rank is Corporal (100 - 500 Reputation Level) 
Time spent in forums: 1 Day 19 h 53 m 20 sec
Reputation Power: 8
Total values

I have a stored procedure that is executed on an access form. I want to be able to total the values up for the stored procedure on the form as o dont htink i can do it in the stored preocedure.

Stored precedure executed with these values:

AM times1: 2 PM times1: 0
AM times2: 1 PM times2: 5

Want field on for to show total for the above:

AM times: 3 PM times: 5

At the moment i only get the first value on the form as it is not totaling the second values. How can i do this. This is how i have executed the stored preocedure and displayed on my form.

Code:
Dim cmd As ADODB.Command
    Dim prm As ADODB.Parameter
    Dim rst As ADODB.Recordset

    Set cmd = New ADODB.Command
    
    Set cmd.ActiveConnection = CurrentProject.Connection
    cmd.CommandText = "DBO.sp_EngineerTimeslotsSchedule"
    cmd.CommandType = adCmdStoredProc
    
     Set prm = cmd.CreateParameter("STARTDATE", adDate, adParamInput, , txt_bookon)
     cmd.Parameters.Append prm
     Set prm = cmd.CreateParameter("CONTRACT", adVarChar, adParamInput, 3, txt_contract)
     cmd.Parameters.Append prm
     Set prm = cmd.CreateParameter("ENGINEER", adVarChar, adParamInput, 20, cbo_engineer)
     cmd.Parameters.Append prm
   
      
    Set rst = cmd.Execute()
    
    If Not rst.EOF Then
        txt_totalAM = rst.Fields("AMAppointments")
        txt_totalPM = rst.Fields("PMAppointments")
    End If
    
   
    Set rst = Nothing
    Set prm = Nothing
    Set cmd = Nothing

Last edited by elenton : December 18th, 2007 at 05:45 AM.

Reply With Quote
Reply

Viewing: ASP Free ForumsProgrammingVisual Basic Programming > Total values


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump



 Free IT White Papers!
 
How to Present Effectively Online
This white paper offers practical and actionable advice on the key steps that any presenter should consider as they plan and execute a Webinar or online meeting.

 
Open Source Security Myths
Open Source Software (OSS) is computer software whose source code is available to the general public with relaxed or non-existent intellectual property restrictions (or arrangement such as the public domain), and is usually developed with the input of many contributors.

 
Power and Cooling Capacity Management for Data Centers
This paper describes the principles for achieving power and cooling capacity management.

 
Scalable, Fault-Tolerant NAS for Oracle - The Next Generation
For several years NAS has been evolving as a storage alternative for Oracle databases, and for good reason: NAS is quite often the simplest, most cost-effective storage approach for Oracle. Learn about the benefits that HP's approach to scalable NAS brings to Oracle environments in this comprehensive white paper.

 
Understanding Web Application Security Challenges
This white paper discusses many common threats and preventive measures for Web application security, and explains what you can do to help protect your organization.

 

Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2009 by Developer Shed. All rights reserved. DS Cluster 5 hosted by Hostway
Stay green...Green IT