Re: How to get the default printer? - Visual Basic Discussion Boards

Anonymous3-Jun-04 4:02

3-Jun-04 4:02

Hey! thanks for the reply. How do you get each printer name? Does printersettings give the printer? if so, what is that property name? I could not see any printer name property in the installed printers.

Re: How to get the default printer?

Dave Kreskowiak3-Jun-04 4:32

Dave Kreskowiak

3-Jun-04 4:32

InstalledPrinters returns an array of Strings. Those are your printer names. You then take each one of those and, one at a time, set the PrinterName property to them, then check the IsDefaultPrinter property to see if the name you set PrinterName to is the default printer. If it is, then you have then printer name you need to send to CrystalReports.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: How to get the default printer?

Dave Kreskowiak3-Jun-04 4:46

Dave Kreskowiak

3-Jun-04 4:46

You might want to try playing with the PrinterSettings class. You can instantiate a PrinterSettings object and see what its PrinterName property says. It might be the name of the default printer. If it's blank, trying getting the InstalledPrinters property. This will be a collection of Strings that represent the printer names. You could then set the PrinterName property of the PrinterSettings object to each one of the printer names returned by InstalledPrinters and check the IsDefault property to see if it is the default printer. Warning: The following code has not been tested and is not guaranteed to even compile! That's what I get for using Notepad...

Dim myPrinterSettings As New PrinterSettings
If myPrinterSettings.PrinterName = "" Then
    ' The PrinterSettings object doesn't come prepackaged with
    ' the DefaultPrinter name.
    ' Start checking the list of InstalledPrinters.
Else
    ' The PrinterSettings object DID come with the DefaultPrinter!
End If
 
 
' InstalledPrinters check
Dim Index As Integer
Dim myPrinterSettings As New PrinterSettings
Dim listInstalledPrinters As String()
Dim DefaultPrinterName As String = ""
 
listInstalledPrinters = PrinterSettings.InstalledPrinters
For Index = 0 To UBound(listInstalledPrinters, 0)
    myPrinterSettings.PrinterName = listInstalledPrinters(Index)
    If myPrinterSettings.IsDefaultPrinter Then
        ' We found the DefaultPrinter!
        DefaultPrinterName = listInstalledPrinters(Index)
        Exit For
    End If
Next
' DefaultPrinterName should now contain the name of the DefaultPrinter.
' If it's empty, then this logic didn't work...

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: How to get the default printer?

Anonymous3-Jun-04 4:41

Anonymous

3-Jun-04 4:41

Hi,

I am getting the default printers, but do you know how to get the network printer aswell?

Thanks

Re: How to get the default printer?

Dave Kreskowiak3-Jun-04 4:47

Dave Kreskowiak

3-Jun-04 4:47

The InstalledPrinters list should contain ALL the printers installed, even the network printers...

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: How to get the default printer?

Anonymous3-Jun-04 5:14

Anonymous

3-Jun-04 5:14

No! its not giving those names. It displays only the installed printers on the local system.

I have personally checked.

Re: How to get the default printer?

Dave Kreskowiak3-Jun-04 5:44

Dave Kreskowiak

3-Jun-04 5:44

Are you saying that you want the printers that another machine is sharing out, like a File/Print server?

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: How to get the default printer?

Anonymous3-Jun-04 6:37

Anonymous

3-Jun-04 6:37

I am talking about the shared network printer.

BTW, i got the work around solution for this. Instead of showing it in the crystal report viewer, I am exporting to the pdf format.

This solves the problem, as i need not to bother about the printer settings.

Anyways, thanks for your help.

Let's make more simple.

Anonymous2-Jun-04 10:34

Anonymous

2-Jun-04 10:34

Good morning.

Maybe i asking for too much. Let's have it like to know every key the user types. Then how can i proceed.

Thank you for your link, but the process is difficult, and they don't have exemple for vb code use.

I don't know what you can do for me

Re: Let's make more simple.

Dave Kreskowiak3-Jun-04 2:52

Dave Kreskowiak

3-Jun-04 2:52

Please don't post the same question twice. I already responded to you in your other thread.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Modifying Selected EAP Type

^eleK2-Jun-04 9:21

^eleK

2-Jun-04 9:21

I've been assigned a project to write a program that will change the EAP type that is set in windows. I then need to alter advanced settings under the changed EAP type but frankly i dont know if anyone here can help with that part ( it's called "SecureW2" http://securew2.com/uk/ ) I can't seem to find anywhere how i can either manipulate this through a windows script or a program.

For further clarification: The pulldown that i need to choose/change an item in is in Network Connections -> Right Click on correct network connection -> Properties -> Authentication Tab -> EAP Type. By default this usually says "Smart Card or other Certificate" and i need to change that to something else.

I've dabbled in the registry a little bit but i can't seem to figure anything out there either. Thanks to any one who can give me help on this.

-Ryan

-------------------
I Am A Closet Geek

Re: Modifying Selected EAP Type

Dave Kreskowiak3-Jun-04 2:51

Dave Kreskowiak

3-Jun-04 2:51

I have no idea on this one. You might want to try the Networking newsgroup on MSDN here[^].

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Help needed - making vb6 LoadPicture faster

steff kamush2-Jun-04 5:58

steff kamush

2-Jun-04 5:58

v6 LoadPicture method is slow.
I need to load quite a number of bmps onto an array of pictureboxes for an imaging app. Is there a quicker way to load images into picboxes?

instead of:

for i= 1 to totalimages
load picturebox1(i)
picturebox1(i).picture = LoadPicture(Path + cstr(i))
next i

i need to do this faster. pls help

Rose | [Rose]

1fm1fu

Re: Help needed - making vb6 LoadPicture faster

Dave Kreskowiak2-Jun-04 12:31

Dave Kreskowiak

2-Jun-04 12:31

There is no way to make it go faster, but you could load your images into an ImageList in Design mode, IIRC, and they will be compiled into your app as resources. You could then get all of your images into your PictureBoxes by fetching them from the ImageList.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: Help needed - making vb6 LoadPicture faster

steff kamush3-Jun-04 0:42

steff kamush

3-Jun-04 0:42

Thanks RageInTheMachine9532.

This works if i have a few images. But i have 3MB of gifs (in harddisk), so i load them in groups of about 14(about 45kb in harddisk - translates to 3MB in memory). Problem is that LoadPicture is slow here.

If i load them into an imagelist at design (all 3MB), they could chew 100MB of memory!

Rose | [Rose]

1fm1fu

Re: Help needed - making vb6 LoadPicture faster

Dave Kreskowiak3-Jun-04 1:21

Dave Kreskowiak

3-Jun-04 1:21

Are you saying that the images you are using are small on disk (3MB total) but take up a LARGE amount of memory when loaded and rendered into a screen format bitmap (100MB)? If this is the case, no wonder it takes forever to load these. Without caching them in memory some how or expanding the images to a more native format (like .BMP), it looks like your going to have to put up with this problem.

I don't see how your going to get around this problem. You can't have speed and high compression at the same time. Generally, it's one or the other. This is because the LoadPicture function has to take a small amount of information and "draw" a large amount of graphics with it to create the bitmap image in memory.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

How can I print text in Landscape?

ATC2-Jun-04 5:25

ATC

2-Jun-04 5:25

I have used the following codes to print out text in Portrait

<br />
       Dim mFont As New Font("Courier New", 12)<br />
        Dim xPos As Single = e.MarginBounds.Left<br />
        Dim yPos As Single = e.MarginBounds.Top<br />
        Dim lineHeight As Single = mFont.GetHeight(e.Graphics)<br />
        Dim str As String<br />
<br />
        '--------------------->  Start to print  <---------------------<br />
        With e.Graphics<br />
            str = "SALE  SUMMARY  From Date1 To Date2 ..............."<br />
            .DrawString(str, mFont, Brushes.Black, xPos, yPos)<br />
            ..................................................<br />
            .DrawString(str, mFont, Brushes.Black, xPos, yPos)<br />
            ..................................................<br />
        End With<br />

- How can I set this to print in Landscape?

Thanks to all help

Re: How can I print text in Landscape?

Dave Kreskowiak2-Jun-04 12:29

Dave Kreskowiak

2-Jun-04 12:29

You might want to try setting the DefaultPageSettings on the PrintDocument object that gave you the Graphics object your using.

Dim myPrintDocumentObject As New PrintDocument()
myPrintDocumentObject.DefaultPageSettings.Landscape = True

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

ADODB Connection events

RichardGrimmer2-Jun-04 3:33

RichardGrimmer

2-Jun-04 3:33

Hi there,

Have an app that parses a .sql file, and executes on a connection object.

Have declared my conn object With Events, and am trapping various events so that I can log them.

When I run the following:

<br />
INSERT INTO Table VALUES (1,1)<br />
INSERT INTO Table VALUES (2,2)<br />
INSERT INTO Table VALUES (3,3)<br />
INSERT INTO Table VALUES (4,4)<br />
GO<br />
<br />

I am only getting my event handler triggered once, with RecordsAffected coming back as 1. What I need is for it either to tell me that 4 records have been affected, or hit the handler 4 times so that I can keep track myself, but there doesn't seem to be any way to do this - anyone know? Have tried trapping both the InfoMessage and ExecuteComplete events.

As an aside, when I do a DELETE FROM Table, am getting RecordsAffected back as 4, and am reading the file by LineInput & vbcrlf until I hit a GO, then conn.Execute strSQL

This is REALLY starting to annoy me!

"Now I guess I'll sit back and watch people misinterpret what I just said......"
Christian Graus At The Soapbox

Re: ADODB Connection events

Dave Kreskowiak2-Jun-04 12:25

Dave Kreskowiak

2-Jun-04 12:25

Ain't gonna work like you want. The ExecuteComplete event will only get fired when SQL complete the BATCH of statements you sent it (remember the GO statement?), and will return the LAST record count affected, not all of them. You will either have to put up with this or send each command seperately, in your case, sending and executing each INSERT statement one at a time.

RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome

Re: ADODB Connection events

RichardGrimmer2-Jun-04 21:06

RichardGrimmer

2-Jun-04 21:06

Feared as much....

Think that I'm going to have to write some sort of sql parser, and look in more detail at what is actually being sent to the server.

Thanks for the assistance!

"Now I guess I'll sit back and watch people misinterpret what I just said......"
Christian Graus At The Soapbox

read excel file

yannaponce1-Jun-04 23:07

yannaponce

1-Jun-04 23:07

help!!!

any idea on how to read excel file in vb.net? an excel file must be in database definition format... then how to generate sql script basing from that file(excel).

help! any idea? it would be of great help... Thanx a lot!

Re: read excel file

^eleK2-Jun-04 9:30

^eleK

2-Jun-04 9:30

in the Visual Studio IDE do a search for the term "Q257819." (sans the punctuation of course) This should show you a listing of topics, the first of which is "HOWTO: Use ADO with Excel Data from Visual Basic or VBA" This should lead you in the right direction.

Re: read excel file

yannaponce2-Jun-04 20:27

yannaponce

2-Jun-04 20:27

thanx for your suggestion... i'll try it.

Command Line compilation in VB.Net

Dinesh Dhamija1-Jun-04 22:00

Dinesh Dhamija

1-Jun-04 22:00

Hi
I am trying to complie windows application code written in VB.net from a command line.
I am getting errors as different classes involved in the project are referencing and using the members of each other, Thus creating a circular reference.

Now to complie 1 class in an assembly, I need other class already in an assembly for referencing. but oher class can not be complied seperately because it reference this class.

If anyone has a clue, Please help out.
Thanks & Regards
Dinesh

Learning more on Dot-Net

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.