|
tommy_tanaka wrote:
path = "\\Matrix\Kunden\" + user._computerName.ToString + ".bmp"
First, you don't need to call .ToString here. _computerName is already a String and doesn't need to be converted to one.
tommy_tanaka wrote:
Dim screenShot, screenShotTemp As Bitmap
Dim screenGraphics As Graphics
For Each user In _clients.Values
Try
user._captureScreen()
path = "\\Matrix\Kunden\" + user._computerName.ToString + ".bmp"
screenShotTemp = Image.FromFile(path)
screenGraphics.FromImage(screenShotTemp)
screenGraphics.DrawImage(screenShot, 0, 0)
screenShotTemp.Dispose()
screenGraphics.Dispose()
Me._schoolMain.Screenshot.Image = screenShot
Second, you're doing alot of unecessary work and this is where your hanging up. All you need to do is load the picture into your screenShotTemp and make a copy of it using a new Bitmap object. Then use the copy as your PictureBox source image and release the original image in your temp variable.
Dim screenShotTemp As Bitmap
Dim path As String
.
.
.
path = "\\Matrix\Kunden\" + user._computerName + ".bmp"
screenShotTemp = Image.FromFile(path)
Dim screenShot As New Bitmap(screenShotTemp)
PictureBox1.Image = screenShot
screenShotTemp.Dispose()
The Bitmap class has about a dozen different constructors. Read up on them here[^].
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I am trying to print a mschart from a vbnet project.
In vb6 it was easy:
MSChart1.EditCopy
Printer.PaintPicture Clipboard.GetData(), x, y
But vbnet no longer has a printer object.
I have tried:
Clipboard.SetDataObject(Me.MeanChart)
e.Graphics.DrawImage(Clipboard.GetDataObject, Y)
DrawImage does not take the argument.
Need help
Thanks ahead
amdinar
|
|
|
|
|
Hello,
I'm trying to store in a New xmlDocument a sql query result, but i'm failed
i'm trying to store the result in a stream and loadxml the stream but i have a lot of error yet.
i want to create a new xml document and make a loadxml with the return of my command object
it was so easy with asp and vb 6 ...
Thanks
clecorre95@hotmail.com
|
|
|
|
|
|
Hi
I want to be able to query a remote server to see if there is anybody logged onto it via a RDP terminal services connection.
Does know if this is possible or what the code would be for this?
Thanks
Andrew
|
|
|
|
|
Hi
I want to be able to query a remote server to see if there is anybody logged onto it via a RDP terminal services connection.
Does know if this is possible or what the code would be for this?
Thanks
Andrew
|
|
|
|
|
This information is only available using the WMI Session Provider, which is only available on Windows XP and Server 2003. The client machine that reads the information must be XP or better. There is no support for other Windows versions.
SessionProvider[^] documentation
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Thanks for that, so you know if there is any other way to get this info, other than by WMI?
|
|
|
|
|
You'll have to P/Invoke the WTSEnumerateSessions[^] function, along with the supporting functions, like WTSOpenServer[^], and WTSCloseServer[^] to get the information you need without the limitations of operating system version and WMI. These links should give to a good start for working with teh Terminal Services API.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi all again,
The next problem that I have is the following:
I declare 2 static constants as a GUI for the SQL-Database.
Private Const GUI1 as new GUID = ??????
How must I finish the Line??????
Thanks in advance
BB
|
|
|
|
|
You can't do the GUID = ???? thing, but you can create a new GUID contant using one of the Guid structure constructors.
Dim myGUID As New System.Guid("{CA761232-ED42-11CE-BACD-00AA0057B223}")
See this[^] page for the complete docs on the Guid structure constructors.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi all,
in VB6 I had the MSComControl to comunicate with the Comports. How can I realize the comunication with the comport in VB.Net?
Thanks in advance
BB
|
|
|
|
|
|
Hi
Can anyone tell me
HOW CAN I SAVE A PICTURE FILE OR PICTUREBOX.IMAGE IN XML FILE IN VB.NET?
i must save my form and all it's component in XML format and then again create my form by using my xml file. how can i do this and save image in picturebox on my form?
Best Regards
M.Khayatan
MkhProgrammer
|
|
|
|
|
XML wasn't really designed to handle binary data like an image, but it is possible to do. Check out this article[^] by CodeZX to see how it's done. It's written in C#, but converts easily to VB.NET.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi!
I am new to .net.
I need urgent help with some coding.
What I have to do is to display the data, entered by a user, in a data grid on the same page, when the user clicks on the save button.
But I can not access any database for this purpose.
se I have created a datatable to load the datagrid. But my problem is that every time the save button is clicked, the previously entered data is erased. This means that my datagrid is effectively displaying only one row at any time.
I read somewhere that hidden fields can be used for this purpose. But i know nothing about them.
Can someone tell me how to go about this?
Any suggestions will be highly appreciated.
Thanx.
|
|
|
|
|
Your question would be better answered in the ASP.NET Forum.
I think about the only place your going to be able to store any data is in the Session object. But that's just my opinion from limited experience.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
my application is running, then suddenly it terminated by itself and exit from the program without any error message. The termination time is not consistent as well.
Please, someone please tell me what is the consequences that the application will terminated by itself?
Jeannie.....
|
|
|
|
|
oceangenie wrote:
someone please tell me what is the consequences that the application will terminated by itself?
It really depends on what the application is doing at the time.
I think you should be more focused on finding out why the application is terminating and fixing that instead.
"If a man empties his purse into his head, no man can take it away from him, for an investment in knowledge pays the best interest." -- Joseph E. O'Donnell
Not getting the response you want from a question asked in an online forum: How to Ask Questions the Smart Way!
|
|
|
|
|
Can anyone help?
My timer stops automatically. Does anyone know why the application run but suddenly the timer stops?
Within my application, i have a timer which act like interval of running program, for example, 5 seconds. Then within 5 seconds, it will do processing inside. But from time to time, my timer will stop automatically within any action that caused. The time it stops is not consistence. Sometimes 5 mins after the application runs, sometimes 15 and sometimes longer.
Thank you.
Jeannie.....
|
|
|
|
|
There's got to be something else going on that is disabling the Timer. There are no known problems with the Timer classes.
Are you disabling the timer in your Tick event handler, then re-enabling it at the end of the handler? Does this handler have any Try/Catch blocks in it that might be bypassing the enable code?
A code snippet showing your setup of the timer and its Tick event handler might help.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello,
I am trying to create a print button that will print a screenshot of the window im working in. Currrently, i have to hit Alt+PrintScreen, copy that into Paint and then print it through Microsoft photo editor. I would like to make this happen with just a print button. Can anyone help me with this matter?? thanks!
megadith
|
|
|
|
|
Could we get a little more info about what it is your wanting to print,
Is it the active VBform window, another program window your working in, or the Entire Screen shot?
If it's just a VBform checkout this,
Print a form's image in VB.NET
http://www.vb-helper.com/howto_net_print_form_image.html
if it's a screen shot checkout this,
ScreenShotDemo vb.net
http://www.developerfusion.com/forums/topic.aspx?id=21514
Hope that helps
|
|
|
|
|
That first link works great, with the exception of not printing title bars. oh well 
thanks alot anonym-dude!
megadtih
|
|
|
|
|
'Here is one that will print the titlebar too..
Public Class Form1
Inherits System.Windows.Forms.Form
#Region " Windows Form Designer generated code "
Public Sub New()
MyBase.New()
'This call is required by the Windows Form Designer.
InitializeComponent()
'Add any initialization after the InitializeComponent() call
End Sub
'Form overrides dispose to clean up the component list.
Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
If disposing Then
If Not (components Is Nothing) Then
components.Dispose()
End If
End If
MyBase.Dispose(disposing)
End Sub
'Required by the Windows Form Designer
Private components As System.ComponentModel.IContainer
'NOTE: The following procedure is required by the Windows Form Designer
'It can be modified using the Windows Form Designer.
'Do not modify it using the code editor.
Friend WithEvents btnPrintForm As System.Windows.Forms.Button
<system.diagnostics.debuggerstepthrough()> Private Sub InitializeComponent()
Me.btnPrintForm = New System.Windows.Forms.Button
Me.SuspendLayout()
'
'btnPrintForm
'
Me.btnPrintForm.Location = New System.Drawing.Point(88, 216)
Me.btnPrintForm.Name = "btnPrintForm"
Me.btnPrintForm.Size = New System.Drawing.Size(136, 24)
Me.btnPrintForm.TabIndex = 0
Me.btnPrintForm.Text = "Button1"
'
'Form1
'
Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)
Me.ClientSize = New System.Drawing.Size(292, 266)
Me.Controls.Add(Me.btnPrintForm)
Me.Name = "Form1"
Me.Text = "Form1"
Me.ResumeLayout(False)
End Sub
#End Region
' create a printing component
Private WithEvents pd As Printing.PrintDocument
' storage for form image
Dim formImage As Bitmap
' create API prototype
Private Declare Function BitBlt Lib "gdi32.dll" Alias _
"BitBlt" (ByVal hdcDest As IntPtr, _
ByVal nXDest As Integer, ByVal nYDest As _
Integer, ByVal nWidth As Integer, _
ByVal nHeight As Integer, ByVal _
hdcSrc As IntPtr, ByVal nXSrc As Integer, _
ByVal nYSrc As Integer, _
ByVal dwRop As System.Int32) As Long
' Callback from PrintDocument component to
' do the actual printing
Private Sub pd_PrintPage(ByVal sender As Object, _
ByVal e As System.Drawing.Printing.PrintPageEventArgs) _
Handles pd.PrintPage
e.Graphics.DrawImage(formImage, 100, 100)
End Sub
Private Sub Form1_Load(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
' create an instance of the PrintDocument component
pd = New Printing.PrintDocument
Me.StartPosition = FormStartPosition.CenterScreen
End Sub
Private Sub btnPrintForm_Click(ByVal sender As _
System.Object, ByVal e As System.EventArgs) _
Handles btnPrintForm.Click
' initiate the printdocument component
GetFormImage()
pd.Print()
End Sub
Private Sub GetFormImage()
Dim g As Graphics = Me.CreateGraphics()
Dim s As Size = Me.Size
formImage = New Bitmap(s.Width, s.Height, g)
Dim mg As Graphics = Graphics.FromImage(formImage)
Dim dc1 As IntPtr = g.GetHdc
Dim dc2 As IntPtr = mg.GetHdc
' added code to compute and capture the form
' title bar and borders
Dim widthDiff As Integer = _
(Me.Width - Me.ClientRectangle.Width)
Dim heightDiff As Integer = _
(Me.Height - Me.ClientRectangle.Height)
Dim borderSize As Integer = widthDiff \ 2
Dim heightTitleBar As Integer = heightDiff - borderSize
BitBlt(dc2, 0, 0, _
Me.ClientRectangle.Width + widthDiff, _
Me.ClientRectangle.Height + heightDiff, dc1, _
0 - borderSize, 0 - heightTitleBar, 13369376)
g.ReleaseHdc(dc1)
mg.ReleaseHdc(dc2)
End Sub
End Class
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
