Visual Basic

Keyboard and Mouse control

13-Jun-07 4:39

I know what you mean. I stopped using VB6 when I got my hands on the .NET Framework 1.0 Beta and was writing code in Notepad!

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

pirogramci13-Jun-07 1:48

pirogramci

13-Jun-07 1:48

Hi,

I want to use mouse left click while "Shift" on down position.
Thank you very much.

kubben13-Jun-07 3:12

kubben

13-Jun-07 3:12

Not sure what your problem is here. Do you have a windows program? You want this program to press the shift key and the left mouse click? You can do this through windows messaging. Not sure if that is what you are trying to do or not.

Ben

Dave Kreskowiak13-Jun-07 3:52

13-Jun-07 3:52

We need a lot more detail about what your problem is. If this is a windows app, then all you have to do is set a flag in your forms KeyDown event when the Shift key is pressed. In your mouse event, you look to see if this flag is set.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

pirogramci13-Jun-07 21:44

pirogramci

13-Jun-07 21:44

Sorry for unadequate details.
Actually I send some commands with SendKeys method to a program works under windows.
I am trying to send mouse click while "shift" pressed.
I can do them separetly by using and mouse_event and SendKeys "+" method (with VB 6.0).
But ı have to do it at the same time and with VB 6.0.

Thanks for your interests.

Dave Kreskowiak14-Jun-07 4:26

how to create a wizard using VB ?

14-Jun-07 4:26

Then you're not going to be able to use SendKeys to do this. SendKeys sends an entire KeyPress, meaning the "make" and the "break" of the key, in other words, pressing the key and releasing it.

You'll have to to the SendMessage API call to wend the window handle the key message to "make" the Shift key, then send the mouse click message, then another key message to "break" the Shift key.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

prashant pissey13-Jun-07 1:01

prashant pissey

13-Jun-07 1:01

hello friends,

can any one of you tell me how to create wizard in Visual basic ?

thanks and regards
prashant

Re: how to create a wizard using VB ?

v1i9n6o7d13-Jun-07 1:46

v1i9n6o7d

13-Jun-07 1:46

You can use VB Wizard Manager that allows you to create the basic framework for your wizard.

-Vinod

Mailmerge with VS2005 ??????????

nawalage12-Jun-07 23:53

nawalage

12-Jun-07 23:53

how to merge a word document and create a new doc ( without a merge fields ).??????????
Confused | :confused:

Thiwa

Re: Mailmerge with VS2005 ??????????

Ajai Chaudhary29-Jun-07 20:03

Ajai Chaudhary

29-Jun-07 20:03

Hi

I could help you, in one of my project i have done the mail merge and create the mailing labels also.

But could you explain the probelm properly i can't understand waht you want to know. Smile | :)

An unhandled win32 exception occured in VB6.EX

Dileep_Vickey12-Jun-07 21:29

Dileep_Vickey

12-Jun-07 21:29

Hi all,
I am trying to code for storing images into database as bytes and for its retrieval. It worked well. But if we try to load more than two pictures one by one then it shows an error as follows.

---------------------------
Visual Studio Just-In-Time Debugger
---------------------------
An unhandled win32 exception occurred in VB6.EXE [1160]. Just-In-Time debugging this exception failed with the following error: No installed debugger has Just-In-Time debugging enabled. In Visual Studio, Just-In-Time debugging can be enabled from Tools/Options/Debugging/Just-In-Time.

Check the documentation index for 'Just-in-time debugging, errors' for more information.
---------------------------
OK
---------------------------

I used GlobalAlloc function to allocate bytes of memory in my heap. I allocates almost 26347868 bytes in memory. I tried to free memory by using GlobalFree. But the result is same.
I will be thankful to you for your help.

Dileep trying to work as a freelancer.

Re: An unhandled win32 exception occured in VB6.EX

Duncan Edwards Jones12-Jun-07 22:36

Duncan Edwards Jones

12-Jun-07 22:36

Post your declaration of GlobalAlloc and GlobalFree - it looks like you may be passing the wrong parameter type...?

'--8<------------------------
Ex Datis:
Duncan Jones
Merrion Computing Ltd

Re: An unhandled win32 exception occured in VB6.EX

Dave Kreskowiak13-Jun-07 3:50

Re: An unhandled win32 exception occured in VB6.EX

13-Jun-07 3:50

Dileep_Vickey wrote:
But if we try to load more than two pictures one by one

So what does this mean? Let's see the code that is storing and retrieving the images. How big are these images, in bytes?

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Dileep_Vickey13-Jun-07 21:22

Dileep_Vickey

13-Jun-07 21:22

Hi all,
Sorry to be late.

Dave Kreskowiak wrote:
So what does this mean?

I meant, I can open any picture i stored in sql database in a picturebox. I stored picture as bytes. Opening of first and second picture (randomly from database) work smoothly. But when i try to open third image then it will show that error. I used following function to retrieve image from collection of bytes.

Public Function PictureFromBits(abPic() As Byte) As IPicture
' abPic() as a byte array
Dim nLow As Long
Dim cbMem As Long
Dim hMem As Long
Dim lpMem As Long
Dim IID_IPicture As GUID
Dim istm As stdole.IUnknown
Dim ipic As IPicture

On Error GoTo Out
GlobalFree (hMem)
nLow = LBound(abPic)
On Error GoTo 0
cbMem = (UBound(abPic) - nLow) + 1
hMem = GlobalAlloc(GMEM_MOVEABLE, cbMem)
If hMem Then
lpMem = GlobalLock(hMem)
If lpMem Then
MoveMemory ByVal lpMem, abPic(nLow), cbMem
Call GlobalUnlock(hMem)
If (CreateStreamOnHGlobal(hMem, CTrue, istm) = S_OK) Then
If (CLSIDFromString(StrPtr(sIID_IPicture), IID_IPicture) = S_OK) Then
Call OleLoadPicture(ByVal ObjPtr(istm), cbMem, CFalse, IID_IPicture, PictureFromBits)
End If
End If
End If
End If
GlobalFree (hMem)
Exit Function
Out:
MsgBox "Out"
End Function

I think this is a problem regarding memory. Please help.

Dave Kreskowiak wrote:
How big are these images, in bytes?

I opened images with almost all sizes. eg: 57060 Bytes.

Thanking for your interest.

Sql server database backup.

Paramhans Dubey12-Jun-07 21:23

Paramhans Dubey

12-Jun-07 21:23

How can I take backup and restore SQL server 2000 database using vb.net 2005.
Pls help me out. If possible give me the code to do it its very urgent.

Thanx in adv.

Regards
Paramhans

Re: Sql server database backup.

Steven J Jowett12-Jun-07 22:04

Steven J Jowett

12-Jun-07 22:04

To do a backup you need to issue the following command to your SQL Server:-
"BACKUP DATABASE myDbName TO DISK = 'd:\Backup\myBackupFile'"

for example :-

Dim connection As New System.Data.SqlClient.SqlConnection<br />
        Dim command As New System.Data.SqlClient.SqlCommand<br />
<br />
            With connection<br />
                .ConnectionString = myConnectionString<br />
                .Open()<br />
                With command<br />
                    .Connection = connection<br />
                    .CommandType = CommandType.Text<br />
                    .CommandText = "BACKUP DATABASE myDbName TO DISK 'd:\Backup\myBackupFile'"<br />
                    .ExecuteNonQuery()<br />
                End With<br />
                .Close()<br />
            End With

To do a restore is as above, except the SQL command to issue is :-

sSql = "RESTORE DATABASE myDbName FROM DISK = 'd:\Backup\myBackupFile'"

Be aware the path to the backup file is local to your SQL Server, not your workstation.

Steve Jowett
-------------------------
Sometimes a man who deserves to be looked down upon because he is a fool, is only despised only because he is an 'I.T. Consultant'

Re: Sql server database backup.

Paramhans Dubey14-Jun-07 19:18

Paramhans Dubey

14-Jun-07 19:18

Thanks Steve for the code u have given. I have successfully taken backup of the database using this code but when I m trying to restore the database following error has been thrown:

Exclusive access could not obtained because the database is in use.
RESTORE DATABASE is terminating abnormally.

Can u help me on this?

Once again thanks for your help.

Regards
Paramhans

Re: Sql server database backup.

Steven J Jowett14-Jun-07 22:42

Steven J Jowett

14-Jun-07 22:42

Try issuing the following command to SQL Server

USE Master <br />
<br />
ALTER DATABASE yourdatabasename SET MULTI_USER WITH ROLLBACK IMMEDIATE;<br />

Steve Jowett
-------------------------
Sometimes a man who deserves to be looked down upon because he is a fool, is only despised only because he is an 'I.T. Consultant'

print subscript & superscript in report

Rupesh Kumar Swami12-Jun-07 21:17

Rupesh Kumar Swami

12-Jun-07 21:17

hi ,
i want to print some part of my message as subscript & superscript. i store sub & sup tag in database with message .Anybody have any idea how can i acheive this thing using vb.net.
i already try crystal report but there r no option for this thing.

any help will be appreciated.

Rupesh Kumar Swami
Software Engineer,
Integrated Solution,
Bikaner (India)

Dave Kreskowiak13-Jun-07 3:48

13-Jun-07 3:48

What is the container that's going to be displaying this message? Is this a report? A web page? A RichTextBox? ?? Whatever that container is is going to dictate how you format and store your data that requires this formatting.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007

Rupesh Kumar Swami13-Jun-07 4:05

Rupesh Kumar Swami

13-Jun-07 4:05

sir,
i post a message related to this subject at here

http://www.codeproject.com/script/comments/forums.asp?msg=2071396&forumid=1646#xx2071396xx

actually i will fetch all my data from database to crystal
report. But crystal report does not support subscript & superscript. so i want to ask there are any other option in vb.net from which i fetch data from database and print in subscript & superscript form(in database field i enter sub & sup tag for support subscript & superscript)

require some guidance and link which help me

thanks

Rupesh Kumar Swami
Software Engineer,
Integrated Solution,
Bikaner (India)

Dave Kreskowiak13-Jun-07 7:08

13-Jun-07 7:08

Crystal Reports supports RichText fields, but NOT all of the RichText formatting commands. This question would be better asked in the forums on BusinessObjects own website.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007