|
simple test on google gives me over 100000 hits.
Public Const SWP_HIDEWINDOW As Integer = &H80
Public Const SWP_SHOWWINDOW As Integer = &H40
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Integer
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Integer, ByVal hWndInsertAfter As Integer, ByVal x As Integer, ByVal y As Integer, ByVal cx As Integer, ByVal cy As Integer, ByVal wFlags As Integer) As Integer
Private Sub bHide_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bHide.Click
Dim hSystray As Integer = FindWindow("Shell_traywnd", "")
SetWindowPos(hSystray, 0, 0, 0, 0, 0, SWP_HIDEWINDOW)
End Sub
Private Sub bShow_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles bShow.Click
Dim hSystray As Integer = FindWindow("Shell_traywnd", "")
SetWindowPos(hSystray, 0, 0, 0, 0, 0, SWP_SHOWWINDOW)
End Sub
|
|
|
|
|
That doesn't disable the TaskBar, it just hides the window temporarily. It's still not a good idea to do.
|
|
|
|
|
I guess I don't truly understand the purpose of the request.
1. If pdnet has the app in Kiosk mode, why are you worrying about the taskbar - you can't see it anyways?
2. Don't know about you, but I'd be pissed if I ran an app and it started changing my theme/settings in Windows without me allowing it to do so.
All around bad idea to it.
Any suggestions, ideas, or 'constructive criticism' are always welcome.
"There's no such thing as a stupid question, only stupid people." - Mr. Garrison
|
|
|
|
|
Sometimes project specifications is to run it full screen so that the taskbar isnt visible. From what I gathered in his post, he doesn't want to disable it, just wants the same functionality as 'Autohide the taskbar' option.
I'm kind of curious as to this myself.
|
|
|
|
|
EliottA wrote: Sometimes project specifications is to run it full screen so that the taskbar isnt visible.
The code I posted earlier in this thread accomplishes that. The form covers the task bar, just like VS if you run it in full screen mode without changing the settings or killing the task bar itself.
Any suggestions, ideas, or 'constructive criticism' are always welcome.
"There's no such thing as a stupid question, only stupid people." - Mr. Garrison
|
|
|
|
|
I've got a legacy DB from which I need to extract a file. But when I do so, the file ends up approximately double the original size (and obviously also unopenable).
Does anybody know a way around this?
Thanks! 
|
|
|
|
|
If you're able to connect to the DB at all, then there's no reason why the file should not come out OK. Hard to say more without seeing code, and knowing what sort of DB you're talking about. I'd assume the issue is in your code tho, b/c if you get a database connection at all, then it should return the right data to you.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
Hi. Thanks for the reply.
It's a SQL Server database. And yes, I am able to connect to it without any problems.
Here's the code I'm using to retrieve the file(s). This code works successfully with files that were saved by my .Net application.
<pre>Private Sub File_Read(ByVal FileName as String, ByVal strConn As String)
Try
Dim ConnRead As New SqlClient.SqlConnection
ConnRead.ConnectionString = strConn
ConnRead.Open()
Dim AdptRead As New SqlClient.SqlDataAdapter(" SELECT FData " & _
" FROM Misc " & _
" WHERE FName = 'filename.exe' ", ConnRead)
Dim CmdBldRead As SqlClient.SqlCommandBuilder = New SqlClient.SqlCommandBuilder(AdptRead)
Dim dsRead As New DataSet
AdptRead.Fill(dsRead)
Dim myRow As DataRow
myRow = dsRead.Tables(0).Rows(0)
Dim byteRead() As Byte = myRow("FData")
Dim sFilePath As String = Application.StartupPath & "\" & FileName
Dim fStream As IO.FileStream
fStream = New IO.FileStream(sFilePath, IO.FileMode.Create)
fStream.Write(byteRead, 0, byteRead.Length)
fStream.Flush()
fStream.Close()
fStream.Dispose()
Catch ex As Exception
MsgBox(ex.Message)
End Try
End Sub</pre>
The file I'm retrieving is 48kb big, but when I retrieve it, it's size is 96kb.
Thank you for your help. Please let me know if you require any more info.
|
|
|
|
|
What is the data type for FData in the database?
If it's varchar, you most likely use different collation now than what was used with VB6.
The need to optimize rises from a bad design.
My articles[ ^]
|
|
|
|
|
How to connect Report with out wizard
Pl give me sample code
VB.Net2005 front laver and Sql Server2005 is back laver
Franics K Antony
|
|
|
|
|
Hey u can connect the database and assign the field to the text or label in report. sorry in my system no backend software. It works I tried previous. Before doing formatting system.
|
|
|
|
|
hi, I,m trying to create a hierarchical view of the data in my database using a gridview but the problem is every time I load the data to the gridview, they will just file in single line. Can you help me to arrange my data in a hierarchical form?
thank a lot.
|
|
|
|
|
You'll need a third party grid to do this. The DataGridView in the .NET Framework does not support this. I suggest looking into DevExpress' control sets.
|
|
|
|
|
actually if I understand what he means with hierarchical gridview it is possible although not easy.
have a look at this
http://blogs.msdn.com/markrideout/archive/2006/01/08/510700.aspx
I never understood why the old datagrid control supported this and the new datagridview doesn't, but I guess that's microsoft.
But as you suggested the DevExpress controls are easyer to use and have alot more options.
|
|
|
|
|
Tom deketelaere wrote: I never understood why the old datagrid control supported this and the new datagridview doesn't, but I guess that's microsoft.
Yeah, I couldn't figure that one out either, and here we are, on the cusp of .NET 4.0 and we still can't do it easily.
Tom deketelaere wrote: But as you suggested the DevExpress controls are easyer to use and have alot more options.
It's much easier to do it with a control that was designed for it from the start than to hack it together.
|
|
|
|
|
Dave Kreskowiak wrote: It's much easier to do it with a control that was designed for it from the start than to hack it together.
True. I actually started to make my own custom grid control (based on the standerd gridview ofcourse), I didn't get far.
I'v been using the devexpress controls for olmost a year now and I have to say there very easy to use (once you understand how they work) and very extended, I fear I'v only scratched the surfice.
|
|
|
|
|
you can try this method. take max. column in datagridview and make visible false and load the data into last col. then u can use visible option true when u increase the hierarchical view. Sorry for any grammar mistake.
|
|
|
|
|
Hi
I want to load a word document into RTF control in VB.Net.I used Loadfile()method, its load only richtextfiles into RTF.But i want to load only .doc files.Any idea...?
Thanks in advance...
|
|
|
|
|
You can't. You need Word on the machine you want to use to load the document, and then you can interact with Word, perhaps to convert the file to RTF and thus be able to load it. Or you can buy a third party control.
Christian Graus
Driven to the arms of OSX by Vista.
|
|
|
|
|
There is one 3rd party control called DSOFramer.cab from Microsoft only, you can load all office components in to it as excel, word etc.
I guess it should be free from micro soft site, check with that.
As it is developped by Microsoft it will work only on IE.
If you want any more components similar to it, you can go for Aspose an Australian company product. But with aspose everything is good it is browser independent, but the problem is you have to define the template document and then fill the data by using code. You can define the template structure by using aspose code.
Try with which you find convenient.
Thanks,
Aleem Mohammad.
Thanks & Regards,
Md. Abdul Aleem
NIIT technologies
|
|
|
|
|
Hi All,
I got solution to this...My code is,
Imports System.IO
Imports System.Runtime.InteropServices
Dim FilePath As String
Dim objWord As Object
Dim objDoc As Object
objWord = CreateObject("Word.Application")
FilePath = ("C:\Documents and Settings\Administrator\Desktop\Resume2.doc")
objDoc = objWord.Documents.Open(FilePath, , True, , , , , , , , , False)
objDoc.Select()
RTB.Text = objWord.Selection.Text
objDoc.Close()
objWord.Quit()
It shows my .doc file into RTB.
|
|
|
|
|
This works, but you lose all the formatting and bullet points. All you're getting is the unformatted text, nothing else.
|
|
|
|
|
How can I say get the first x cells in an excel sheet where all you know is the row?
Ie get sum of first x cells starting at cell y?
|
|
|
|
|
I'm not sure what you're after, but using Rows method you can select an entire row. For example:
Application.ActiveSheet.Rows("1:1").Select
After that you can iterate through the Range object using Application.Selection.
Hopefully this gets you forward.
The need to optimize rises from a bad design.
My articles[ ^]
|
|
|
|
|
I have a process whereas I need to save a string from a textbox to a temp file and then hashing the file via SHA1. I have that handled but when I create the file and write the data to the file
"08 39 01 62 30 21 12 69 09"
it is written in ascii and I need it written in hex as is. So if you opened the file up in a hex editor you would see "08 39 01 62 30 21 12 69 09" with the ascii as .9.b0!.i. .
Currently I am only getting 30382033392030312036322033302032312031322036392030390D0A
as my hex string in the hex editor and obviously hashing that value will not match the hash of h08 h39 h01 h62 h30 h21 h12 h69 h09
Thanks for any and all help.
Celldet
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
