|
Hi to all
can someone help me in writing code for Hibernating and Stand By (suspend) computer using vb.net code.
I have searched the internet a lot but don't found a reasonable answer to it.
|
|
|
|
|
I think but im not sure you will have to double check it
that there is some functionality in wmi. there is good documentation on the
microsoft website on how to access wmi from vb.net
good luck.
Dan
|
|
|
|
|
|
I have to get the relative path to an excel sheet which is placed in folder where my vb.net project is present. What is the command to get relative path ?
Divya Rathi
|
|
|
|
|
Look up the Application (for .NET) or App (VB 6) object.
...Steve
1. quod erat demonstrandum
2. "Give a man a fish and you've fed him for a day. Teach him how to fish and you've fed him for life." I read that somewhere once 
(Translation: I'll show you the way, but not write the code for you.)
|
|
|
|
|
You could use
Console.WriteLine(Path.GetFullPath("..\"))
|
|
|
|
|
Hi all,
I've just started programming in VB.net and am new to this forum. I've created a main screen for an application with several buttons, and grids.
I set the appropriate anchoring and everything works fine on me and my tester's PC monitor. I can resize the forms and use different redolutions.
However, when I run on my bosses Dell laptop, the right hand side and bottom of the screen are missing. No matter what I change the resolution to you can never see everything.
Has someone ever come across this issue before?
Any help would be much appreciated,
Dave
|
|
|
|
|
Okay this looks nasty. Real Nasty. So here's the code.
Its supposed to be three parallel color polygons but, it doesn't look like that.
This is the first time i'm using the gradient brush so, if any of the experienced Vb programmers could help me make it look neater than what it is, that would be appreciated.
Private Sub frmSplash_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles MyBase.Paint
'Declares procedure level varaibles.
Dim brGradient As System.Drawing.Drawing2D.LinearGradientBrush
Dim points() As PointF
'Defines the rectangle.
Dim clientRectangle As New System.Drawing.Rectangle(0, 0, _
Me.Width, Me.Height)
'Sets the Gradient Brush color for the red polygon.
brGradient = New System.Drawing.Drawing2D.LinearGradientBrush(clientRectangle, _
Color.Black, Color.Red, _
System.Drawing.Drawing2D.LinearGradientMode.Horizontal)
'Draws the points for the red polygon.
points = New PointF() {New PointF(0, 0), _
New PointF(0, 30), _
New PointF(ToSingle(Me.Width / 2.3), 320), _
New PointF(ToSingle(Me.Width / 2), 320), _
New PointF(ToSingle(Me.Width / 2), 295), _
New PointF(35, 0), _
New PointF(0, 0)}
'Fills the red polygon using the points and gradient brush.
e.Graphics.FillPolygon(brGradient, points)
'Closes the Gradient brush.
brGradient.Dispose()
'Sets the Gradient Brush color for the green polygon.
brGradient = New System.Drawing.Drawing2D.LinearGradientBrush(clientRectangle, _
Color.Black, Color.Green, _
System.Drawing.Drawing2D.LinearGradientMode.Horizontal)
'Draws the points for the green polygon.
points = New PointF() {New PointF(125, 0), _
New PointF(125, 30), _
New PointF(400, 320), _
New PointF(435, 320), _
New PointF(435, 295), _
New PointF(160, 0), _
New PointF(125, 0)}
'Fills the green polygon using the points and gradient brush.
e.Graphics.FillPolygon(brGradient, points)
'Closes the Gradient brush.
brGradient.Dispose()
'Sets the Gradient Brush color for the blue polygon.
brGradient = New System.Drawing.Drawing2D.LinearGradientBrush(clientRectangle, _
Color.Black, Color.Blue, _
System.Drawing.Drawing2D.LinearGradientMode.Horizontal)
'Draws the points for the blue polygon.
points = New PointF() {New PointF(255, 0), _
New PointF(255, 30), _
New PointF(525, 320), _
New PointF(560, 320), _
New PointF(560, 295), _
New PointF(290, 0), _
New PointF(255, 0)}
'Fills the blue polygon using the points and gradient brush.
e.Graphics.FillPolygon(brGradient, points)
'Closes the Gradient brush.
brGradient.Dispose()
Ty
-- modified at 11:54 Tuesday 14th March, 2006
|
|
|
|
|
Replace ToSingle with CSng. You have created polygons. But those polygons don’t look like what you have expected. Try to change x- and y-coordinates of PointFs according to you preference.
chatura
|
|
|
|
|
What does CSng mean and what does it do?
Ty
|
|
|
|
|
converts to single data type
chatura
|
|
|
|
|
Hi all,
1-I need to use custom paper size using crystal report in vb.net, how can I ?
2-Is there any way to create custom paper size and include it in printer paper size collection using printer properties at windows level ?
Thanks in advance
|
|
|
|
|
The first step is to see if your printer driver can support custom paper size settings - the PrinterSettings.PaperSizes property lists all the paper sizes supported by a printer and if this collection includes a paper size with .Kind = PaperKind.Custom then it can.
'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd
|
|
|
|
|
Hello,
Its supporting for custom kind . please let me know the details. and also let me know how to assign "CrystalObject" (object of .rpt) to "PrintDocument" object. Thanks
|
|
|
|
|
Yes , I found the way to add custom paper size in the printer collection of paper sizes.
Start -> Settings -> Printers and Faxes -> right click in the window -> Server Settings -> Create form ,give width & height and save the form with new name. now you have custom paper size in collection of printer.
Be sure,while creating form that you have selected the required printer driver.
Enjoy the Solution......
|
|
|
|
|
|
Hello
Lately I have a problem when I try to run a project with debugging (shortcut F5). I get the following message, for ANY project:
---------------------------
Microsoft Development Environment
---------------------------
Error while trying to run project: Unable to start debugging.
Unable to start program 'C:\Documents and Settings\urim\My Documents\Visual Studio Projects\WindowsApplication8\WindowsApplication8\bin\WindowsApplication8.exe'.
No such interface supported
If I run without debug (CTRL+F5), it works fine.
What is the problem ? Can anyone please help?
Thanks ahead.
Uri.
|
|
|
|
|
Might I suggest digging into Microsoft's Knowledge Base, here[^].
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
when i try to show a form which is on hide "me.hide" it have error.. i dont want to use the "me.close" casue if i use that whole the system will exit...i dunno y.. any way to show the hide form??
|
|
|
|
|
|
JOY
Hai,
I am working on a student database project in Vb.net. I have established a connection betwen Ms-Access table & my form through DATASET. Now i am able to save & retrive the records.
what i want is to store the photograph of students.
if i am not wrong, we can use imagelist so that the photos can be displayed.but how to connect it from the access table .
My second question is to know how to store & retrive the photos.so that whenever i move to a particular student's record ,his photo should appear.Can u pl help me with an example for a clear understanding
if photos cannot be stored in a databae then what could be an alternative to this. pl exlain briefly if so.
Arun
|
|
|
|
|
In the past I would usually store the image NAME (ie. in a "Image_PathFileName" field. This way when I run through my recordsets I can retrieve the image by pulling the Image_PathFileName value and plugging it into my code.....
-Kay
|
|
|
|
|
|
You can use as folllowing
1- get the path using Open file dialogue in text box as I taken in txtCompanyLogo.text
2-
Dim arr() As Byte
If Trim(txtCompanyLogo.Text) <> "" Then
FileOpen(1, txtCompanyLogo.Text, OpenMode.Binary, OpenAccess.Read, OpenShare.Shared)
'Resize array so that it can accomodate the file
ReDim arr(FileLen(txtCompanyLogo.Text) - 1)
FileGet(1, arr)
FileClose(1)
'/////// Ds is DataSet & CompanyInfo is TableName & CompanyLogo is Field Name for Binary Data ////////////
ds.Tables("CompanyInfo").Rows(0).Item("CompanyLogo") = arr
End If
Enjoy Solution
|
|
|
|
|
Hello,
I used to display binary image in VB 6.0 using the following code:
<br />
<br />
dim byteImage() as byte<br />
' assuming byteImage() has value display the image using PICTUREBOX object<br />
picturebox1.image.hpal = byteImage<br />
This procedure seems to be not supported by VB.net, anybody has an know/idea on how will I do this in VB6.0?
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
