Search results for query: *

Guys, If you are interested, here is some VB6 code that sends a file to .NET webservice. No MSXML - all hand coded. Graeme Rhinoman Dim serializer As New MSSOAPLib30.SoapSerializer30 Dim Connector As MSSOAPLib30.HttpConnector30 Dim Parser As New MSSOAPLib30.DimeParser30 Dim...

I have been attempting to upload binary files (pdb) from VB6 back to the .NET webservice with not much luck. Am able to download ZIP files without issues. How have you overcome the issue of advising .NET that files are on the way? regards Graeme Anderson

Hi, I have an old application written in VB5 using Crystal V5 and I want to get it to run on XP. The setup program that worked fine in 95' & 98' seems to be missing something or crystal does not work in XP? The application works fine (Uses Ms Access97) but all crystal reports bomb out with...

I have a table/grid of customers and super users can select one customer and that will be the default customer used on subsequent pages. Have put the customerId into a session variable via a button submit on repeating rows and retrieved by Querystring.Request(..). Is it possible to store the...

I am writing a VB6 app that will be given away as a demo and will run using MS Ascess Db. Later if client decides to purchase, we will ship out MSDE or SQL Server. My code below works with SQL 2000 but not MS Access 2000, no error is raised but data is not updated either. Must be a simple one...

I would like to instead of adding a new image from a file (working code example below) add the image from a Resource File in VB6. This will make my app self contained pretty much. Thanks for any tips, Graeme Anderson Const MAX_PATH = 260 Const NIF_ICON = &H2 Const SHGFI_ICON = &H100 Const...

Try http://www.mindspring.com/~efd/ which offers just what you need and is free I believe. For a small cost you can get the source code. recommended, Graeme Anderson

Hey, thanks to Logius, I was able to figure it out, simple really. Here is the code: Set nms = ActiveWorkbook.Names For r = 1 To nms.Count Worksheets(Mid(ActiveWorkbook.Names(r).RefersTo, 2, InStr(ActiveWorkbook.Names(r).RefersTo, "!") - 2)).Activate sFieldName =...

I am attempting to read all named ranges in Excel SS in all Sheets and return the RangeName and the Value in the range but code only works for the selected sheet. This code works but only in the active sheet: Set nms = ActiveWorkbook.Names For r = 1 To nms.Count sFieldName =...

If you are still looking, this worked for me.. add reference to Dao 3.6 in A2K. Private Sub SendBackValuetoDB() Dim Mydb As DAO.database Dim MyRec As DAO.Recordset Dim MyVal As Variant Dim wrkJet As DAO.Workspace Set wrkJet = CreateWorkspace("&quot...

If the number of records being copied is large then the code method put forward seems Ok if you want feedback on process. A small amount of records certainly use an update query

Sounds like you need to change the form to be a master/detail format. That is each patient detail is at the top and reservation history for that patient is in a grid or separate form below this. You will need to modify the query to only bring back patient details and create a new query to...

Hi, you have not done a couple of things correctly, so here goes - - - ** this is OK Set rstContacts = dbs.OpenRecordset(strQuery, dbOpenDynaset) ** you need to open the tblNew like ** set tblnew =dbs.openrec..., get rid of rstNew altogether With rstContacts ... other stuff left out for...