Use the .TAB property of the SSTab control like this...
Next button
If SSTab1.Tab < (SSTab1.Tabs - 1) Then SSTab1.Tab = SSTab1.Tab + 1
Previous button
If SSTab1.Tab > 0 Then SSTab1.Tab = SSTab1.Tab - 1
Net_Giant
What fun is a technology if you can't crash the OS?
Maybe I'm not thinking clearly without my usual dose of coffee but ... it looks like you're showing the report (modally) *before* the connection is open and the query has been run.
Do you ever set the recordset of ADODC2? Try changing the OpenReport() method to something like this ...
Private...
Check out the www.vbip.com site for tons of articles, tutorials and code related to net programming with VB.
Net_Giant
What fun is a technology if you can't crash the OS?
...component. Maybe you can automate their form processing.
MS Word can also work with documents as forms.
The down side to both of those is that you *must* have the full versions of each of them so your cost just went up considerably.
Net_Giant
What fun is a technology if you can't crash...
Try this routine. I didn't write it and I've forgotten where I found it but I think it may give you what you're looking for - the amount of memory used by your VB app. You could even adapt it to work on other processes but I'll leave that up to you. :-)
This is my first TGML code posting so...
Edit the FRM file manually.
Make a backup *before* you attempt the change in case things get out of hand and the file gets mangled. The TabStrip properties in the form probably look like this ...
Begin MSComctlLib.TabStrip TabStrip1
Height = 735
Left =...
Can you post the procedure declaration (not the code, just the name and parameter list stuff).
Net_Giant
What fun is a technology if you can't crash the OS?
...Get intFile, , strBuffer
Close #intFile
' Replace special characters and split into lines
astrLines = Split(Replace(strBuffer, "*", " "), vbCrLf)
This will leave you with an array of the line contained in the file. The lines will have spaces instead of *.
Net_Giant
What fun is a...
Try specifying the length of the input parameter in the optional size parameter to CreateParameter. Use something like this...
Set prmId = cmdId.CreateParameter("ID", adVarChar, adParamInput, Len(mgrID), mgrID)
Net_Giant
What fun is a technology if you can't crash the OS?
It sounds like this is the sequence of events.
1) app is started in IDE
2) DLL function invoked successfully
3) current directory on the drive with the app is changed
4) app is closed
5) app is started again in IDE
6) DLL cannot be found because it is not in the current directory (changed in...
...1) Set the control's .Visible property to false so it won't try to update it's display after every item is added. Show it after everything is added.
2) Investigate using API function to populate it - SendMessage() and LVM_* messages.
Net_Giant
What fun is a technology if you can't crash...
...Windows 9x. What OS were you using when you were able to work with the DLL successfully?
Only COM components are registered with regsvr32. If you *must* use "Declare" statements in your code then the DLL is almost certainly *not* a COM DLL.
I believe you would get that error message if the...
...Rumba where I work. I tried using the examples/help files on the NetManage site years ago. They haven't changed at all. The most recent version of *any* file in their example section is from March of 98. Are they still selling Rumba?
I eventually found some EHLLAPI code a guy posted on some...
I know that a lot of people do it and I'm not trying to start a message war but ...
MS specifically advises *against* using any MS Office apps in an unattended environment. Check these knowledgebase articles for more info - Q257757 & Q259971.
It's kinda funny that they all but admit that the...
Uh. If you're getting a recordset then you already have the column names. Check the YourRecordset.Fields(0).Name property. Try this snippet.
Dim objField as ADODB.Field
For Each objField In YourRecordset.Fields
With objField
Debug.Print .Name
Debug.Print .Type
Debug.Print...
VB 6 Enterprise comes with MS Visual SourceSafe which lets you keep track of different versions of files. It also allows you to compare files and display the differences side-by-side.
Net_Giant
What fun is a technology if you can't crash the OS?
OK. Let me ask that question a different way ...
Suppose you run the app, add a few records, close the app and then run the app again. How can you tell what records were added when you ran the app before?
Net_Giant
What fun is a technology if you can't crash the OS?
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.