|
I've made a simple program in VB 6.0 (In Win XP) and therefore had to use some project references (for the FSO) and some components. Now, in VB the program works, when I make an .exe file, it works in Win XP but when I copy the whole .exe file and paste it into a computer wich is running Win 98 it doens't work.. I than get the Runtime Error 430 , "Class doesn't support Automation" or something like that...
Anybody please help because I don't get this....
<<<erik>>>
|
|
|
|
|
this is probably a stupid answer, but: is the vb6 runtime dll installed on the win98 machine?
------------------------
Jordan.
III
|
|
|
|
|
Yes it is, otherwise the program would give an other error... But I think that some other references or components are not installed wich gives the error.. So... Help....
<<<eRiK>>>
|
|
|
|
|
ok... sorry bout that then.
hope someone here can help you out.
------------------------
Jordan.
III
|
|
|
|
|
can u post some of your code? or explanation of what the program is doing?
u using any ADO?
if so, go here[^] and click the 2nd item, MDAC, and download an upgrade.
------------------------
Jordan.
III
|
|
|
|
|
ADO??? I'm not using that i think... I would give you the source-code, just give me your e-mail...
<<<eRiK>>>
|
|
|
|
|
nadroj_@hotmail.com
u dont have to send the whole thing. im saying just post afew parts here, like the initialization of it, and afew other areas of implementation.
did u check that link and upgrade?
------------------------
Jordan.
III
|
|
|
|
|
I have found this code to set printer properties using Windows API:
Controlling the Printer from Word VBA[^]
which is basically a further development of Microsoft's article:
HOWTO: Set Duplex Printing for Word Automation[^]
I want to ask whether any of you guys have done or have any ideas on how to set printer stapling using the code above.
I am thinking of creating a new constant for the stapling, e.g.
Public Const DM_DUPLEX = &H1000&
Public Const DM_STAPLE = &H2000& '(added line)
and add a new variable in the DEVMODE Type:
Public Type DEVMODE
dmStaple as integer
End Type
then set the dmStaple and set it to the printer using the API, but somehow I don't think it is going to work at all.
Question:
1. Can I set printer stapling using the API mentioned in the sites above?
2. If I can, can I do it like the above? If not, can you please point me to the right direction (e.g. giving a link to SDK site / MSDN article, code snippets, etc.)
Thanks.
Edbert P.
Sydney, Australia.
|
|
|
|
|
First you need to find out if the printer supports stapling at all by calling the Api GetDeviceCaps with the index DC_STAPLE.
Public Enum PrintDeviceCapabilitiesIndexes
' ##ENUMERATION_MEMBER_DESCRIPTION DC_FIELDS Which fields of the device mode are used
DC_FIELDS = 1
' ##ENUMERATION_MEMBER_DESCRIPTION DC_PAPERS Which Printer Paper Sizes the device supports
DC_PAPERS = 2
' ##ENUMERATION_MEMBER_DESCRIPTION DC_PAPERSIZE The dimensions of the paper in 10ths of a millimeter
DC_PAPERSIZE = 3
' ##ENUMERATION_MEMBER_DESCRIPTION DC_MINEXTENT The minimum paper width and height the printer can support
DC_MINEXTENT = 4
' ##ENUMERATION_MEMBER_DESCRIPTION DC_MAXEXTENT The maximum paper width and height the printer can support
DC_MAXEXTENT = 5
' ##ENUMERATION_MEMBER_DESCRIPTION DC_BINS The standard paper bins supported by this printer
DC_BINS = 6
' ##ENUMERATION_MEMBER_DESCRIPTION DC_DUPLEX Whether the printer supports duplex printing
DC_DUPLEX = 7
DC_SIZE = 8
DC_EXTRA = 9
DC_VERSION = 10
DC_DRIVER = 11
DC_BINNAMES = 12
DC_ENUMRESOLUTIONS = 13
DC_FILEDEPENDENCIES = 14
DC_TRUETYPE = 15
DC_PAPERNAMES = 16
DC_ORIENTATION = 17
DC_COPIES = 18
DC_BINADJUST = 19
DC_EMF_COMPLIANT = 20
DC_DATATYPE_PRODUCED = 21
DC_COLLATE = 22
DC_MANUFACTURER = 23
DC_MODEL = 24
DC_PERSONALITY = 25
DC_PRINTRATE = 26
DC_PRINTRATEUNIT = 27
DC_PRINTERMEM = 28
DC_MEDIAREADY = 29
DC_STAPLE = 30
DC_PRINTRATEPPM = 31
DC_COLORDEVICE = 32
DC_NUP = 33
End Enum
Private Declare Function DeviceCapabilities Lib "winspool.drv" Alias "DeviceCapabilitiesA" (ByVal DeviceName As String, ByVal Portname As String, ByVal Index As PrintDeviceCapabilitiesIndexes, ByVal lpBuf As Long, pDevMode As Long) As Long
...
'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd
|
|
|
|
|
...
However the structure DEVMODE is defined by the windows header file and you cannot change it....and unfortunately it does not have a dmStaple member.
'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd
|
|
|
|
|
Thanks for that, Duncan.
Can you please give me a suggestion on what I should investigate to set the printer stapling? (API, PCL Printer Commands, PJL, etc.)
Edbert P.
Sydney, Australia.
|
|
|
|
|
I want to delete the character that is in the cursor position(the text in Textbox control in VB6). help me please.
|
|
|
|
|
more detail plz
------------------------
Jordan.
III
|
|
|
|
|
I want to delete the character that is in the Cursor position!(Current position of Blink cursor in a textbox)
|
|
|
|
|
Text1.Text = Left$(Text1, Text1.SelStart) + Right$(Text1, Len(Text1) - Text1.SelStart - 1)
|
|
|
|
|
Hello...
I am using a tab control in my project. How can I display a webpage when I choose one of the tabs?
Thank you...
|
|
|
|
|
First, add a reference to Microsoft's WEb Browser control to your project:
1. Bring up your Toolbox window and click on the My User Controls tab
2. Right-click in the Toolbox window and click Add/Remove Items...
3. Click on the COM Component tab.
4. Scroll down to Microsoft Web Browser and click the checkbox next to it, then OK.
At this point, you should see a little world icon in your Toolbox labeled Microsoft Web Browser.
5. Click on your tab tab in the designer to bring up the page you want this on.
6. Drag a Web Browser Control from your Toolbox onto the tab page.
Now all you have to do is set the properties of the borwser to arrange it the way you want, like if you want an address bar showing, status bar, menu bar, ... Than when that tab is clicked, your event handler should do something like this:
AxWebBrowser1.Navigate("http://www.google.com")
or some other web page, perhaps stored locally:
AxWebBrowser1.Navigate("C:\testdir\filename.html")
RageInTheMachine9532
|
|
|
|
|
Dear RageInTheMachine9532,
Your advice really helped us. A very big thank you to you.....
len_ems
|
|
|
|
|
No problem. Thank you.
RageInTheMachine9532
|
|
|
|
|
Can anyone tell me how to add a PageBreak in Excel using VB.NET?
boy is the Excel Object model a pain!!!
|
|
|
|
|
I'm looking for a solution to handle all unhandled errors within a VB.NET application. I would like it to log information such as, error number, line number, call stack, variables and values, etc.. Basically as much information as possible.
If someone knows where I can get information on the best way to do this, has some sample code or knows of an available product (commercial or freeware) I would appreciate knowing about it.
Thanks
|
|
|
|
|
Microsoft create some stuff called the "Application Blocks for .NET" a while back. One of those was called "Exception Management".
They're complex, but they're free.
What a piece of work is man, how noble in reason, how infinite in faculties, in form and moving how express and admirable . . . and yet to me, what is this quintessence of dust? -- Hamlet, Act II, Scene ii.
|
|
|
|
|
I have a simple class which does all this for you.
When your program initialises, you do this:
If (Not System.Diagnostics.Debugger.IsAttached) Then<br />
ExceptionManager.Instance().AppName = "YourAppNameHere"<br />
End If
The class then pops up a dialog when an exception occurs, showing the stack-trace, error message, etc, and on closing that dialog, a new instance of the program can optionally be started.
You don't have to have the Debugger.IsAttached test, but it means that the exception handler won't pop up if you are debugging in the IDE.
Let me know if it sounds like what you need.
|
|
|
|
|
Sounds simple enough. Perhaps you might direct this to the attention of the person who posted the original query; by replying to my reply, the message went to me instead of him.
What a piece of work is man, how noble in reason, how infinite in faculties, in form and moving how express and admirable . . . and yet to me, what is this quintessence of dust? -- Hamlet, Act II, Scene ii.
|
|
|
|
|
It sounds exactly like what I need. Would it be possible for me to get a copy of it.
If so, I'd really appreciate it.
Thanks,
Wayne
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
