Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations SkipVought on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. RobHVB6Sql

    Build Dynamic var with case issue

    UPDATE: I'm unsure why but this works. Was possibly the *= joins, now using an IF statement. IF @ServiceVenue = 100 SET @theSQL2 = 'WHERE rfa.ContactID = c.ContactID ' + 'AND c.ContactDate >= ' + CHAR(39) + @DateFrom + CHAR(39) + ' ' + 'AND c.ContactDate >= ' + CHAR(39) + @DateTo +...
  2. RobHVB6Sql

    Build Dynamic var with case issue

    Thanks Jim, yep I checked that and all fine. But if I run the three statement here, I get the same result. As though the service venue (100, 5, 6) is not selected for. spprintTopRFAByVenue 100, '01/01/2004', '01/02/2004', 20 spprintTopRFAByVenue 5, '01/01/2004', '01/02/2004', 20...
  3. RobHVB6Sql

    Build Dynamic var with case issue

    The following always seems to evaluation to the first '100' case and doesn't get to the else. What is wrong with my case? any ideas? :-( CREATE PROCEDURE spprintTopRFAByVenue ( @ServiceVenue INTEGER, @DateFrom VARCHAR(30), @DateTo VARCHAR(30), @TopNNum INTEGER ) AS -- -- Work done: -- 1)...
  4. RobHVB6Sql

    Cr9 Connect /ConnectionInfo issue

    The reports are located on a network drive. I now have it working using the method below. I'll probably stick with this method, sorry need to get this going quickly. PS I do remember changing the Reference /Components and rebooting VB, maybe this was the issue. I'm now using crviewer9.dll...
  5. RobHVB6Sql

    Cr9 Connect /ConnectionInfo issue

    I'm using VB6 /SQL6.5 and CR9. Sorry I looked through heaps of posts and cant solve this one. Dim ConnectionInfo As CRAXDRT.ConnectionProperties Set ConnectionInfo = Report.Database.Tables I recieve and error message saying the 'report' variable is not defined. When I define it eg Dim...
  6. RobHVB6Sql

    Show Answer in report -running total

    Awesome :-) I was close. Yes the solution is: 1) {@Truncate-Age@Diag} formula: If IsNumeric({spPrintClientByDiagnosis;1.AgeAtDiagnosis}) and {spPrintClientByDiagnosis;1.AgeAtDiagnosis} > '0' then round (ToNumber({spPrintClientByDiagnosis;1.AgeAtDiagnosis}), 1) else 99999 2) Right...
  7. RobHVB6Sql

    Show Answer in report -running total

    Hmm, a prickly one here. [evil] I wish to highlight the mimimum of a number field 'AgeAtDiagnosis' in a report. I have a running total (#RTotal0) and can get the minimum of the number field in the report footer. (I think a running total was necessary as AgeAtDiagnosis contains 0 values). I now...
  8. RobHVB6Sql

    using VB to send an email

    I have used this dll and found it very good. SMTP sender tool written by Igor Ostrovsky (OstroSoft). See http://www.ostrosoft.com/smtp_component Here is some code to get you started. Please note I have created and set many variables here, you can just replaced these with strings. 'declare...
  9. RobHVB6Sql

    how can i zip a file programatically using VB6?

    My 2 cents worth, hope this helps :-) I had the same issue and found WinZip quite good. Especially if you need to compress the file with password protection! Combining this with OSSMTP.dll I now compress the file and email it off for the user which works nicely showing the user messages as each...
  10. RobHVB6Sql

    Resize Preview window

    This one has been driving me batty for some time .. BACKGROUND: Using VB 6 /SQL and Crystal 8.5. A previous developer linked CrystalReport1 to a VB form and set the following: CrystalReport1.WindowParentHandle = frmPrintPreview CrystalReport1.Destination = crptToWindow...
  11. RobHVB6Sql

    Subreport linking

    Great thanks. I actually solved it in another way, but your solution is more versitile as it is within the Crystal Report. My cheat = Add six columns to the stored procedure which return the value and use this as the second sub report link. Here's a star ;-) Rob Hasard (VB6 /SQL 7.0 /CR8.5)
  12. RobHVB6Sql

    Subreport linking

    Thanks. SOME MORE DETAIL: The sp for the main report pulls from a cancer returns table 'WACRResponses'. The sp for the subreports pulls from a subsequent 'WACRResponsesPathInfo' table which can have 0 to 6 rows (Pathology Reports) related to the row in the WACRResponses (or main) table. They...
  13. RobHVB6Sql

    Subreport linking

    BACKGROUND: (Using CR 8.5) I have a report that uses two stored procedures, one for the main part of the report and one for the subreport link. One parameter: ‘@RequestID’ from the main report is used to select info for the subreports, this link is working fine. :-) THE QUESTION: How do I...
  14. RobHVB6Sql

    Group or not on parameter

    CR8.5 /SQL Sorry, I'm obviously missing something here, read several threads, but no help. I have two groups and wish to allow the user to choose to use the second (sub) group or not. They always want to see all records. I have a string parameter @Group1 passed in, but I don't know how to...
  15. RobHVB6Sql

    MSHFlexGrid - User click on Header

    Yup, that'll do it :-) Here is some solution code that will sort any column. Thanks Artie. 'declaration section dim blnAscend as boolean Private Sub theGrid_Click() With theGrid 'if user clicked the grid header, then sort by that column! If (.MouseRow < 1 And blnAscend = True)...
  16. RobHVB6Sql

    MSHFlexGrid - User click on Header

    What property /code can I use to see what header column the user clicked on. This will then allow me to sort the grid on this column. I'm not sure I want to use .Row = 0 as I normally bypass processes when this is true. I've also looked at: .Col .MouseRow .MouseCol I presume I'll be...
  17. RobHVB6Sql

    How to Install SQL Enterprise Manager?

    Great thanks. I did it from the MSDE for Visual Studio CD. Thanks again. Rob Hasard (VB6 /SQL 7.0)
  18. RobHVB6Sql

    How to Install SQL Enterprise Manager?

    MachineA (Wn98) has SQL Query Analyser 6.5 installed. I recently installed VB6, SP5 and MSDN on MachineB (WinXP) and have Enterprise Manager -cool :-) What CD do I use to install Enterprise Manager on machineA? Rob Hasard (VB6 /SQL 7.0)
  19. RobHVB6Sql

    Treat Integer field Zero like NULL

    Great thanks, I just used a CASE statement, ie: SELECT 'Client' = p.Surname + ', ' + p.Firstname + CASE p.Title WHEN 0 THEN ' ' ELSE ' ' + p.Title END FROM tblPerson p Rob Hasard (VB6 /SQL 7.0)
  20. RobHVB6Sql

    Treat Integer field Zero like NULL

    I have been struggling with this one for some time. Several reports use this and I want to return the title (an integer field) where possible, but return a space for those with a 0 value. Can anyone come up with code that acts like ISZERO? much like ISNULL? SELECT 'Client' = p.Surname + ', '...

Part and Inventory Search

Back
Top