Visual Basic

18-Mar-06 3:10

First, STOP YELLING!

Second, you haven't specified anything about your datasource or how you're populating this DataGrid.

You might want to look at this[^] to see if it fits your needs. The code is in C#, but is easily convertible to VB.NET.

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

File in use errors

taw917-Mar-06 11:29

taw9

17-Mar-06 11:29

This code always results in a file in use error (error 57):

Sub DelPic(ByVal filename As String)<br />
       <br />
        Dim fi As New FileInfo(filename)<br />
        If Not fi.Exists Then Exit Sub<br />
        Try<br />
            fi.Delete()<br />
        Catch ex As Exception<br />
            MsgBox(Err.Source & " caused an error of type " & Err.Number)<br />
        End Try<br />
<br />
    End Sub

No other programs are running, all files are closed and file.attributes shows normal.
What am I doing wrong?

Re: File in use errors

Dave Kreskowiak17-Mar-06 12:41

17-Mar-06 12:41

See this[^] post for what's causing your problem and the solution...

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

application.exit

pbaggett17-Mar-06 11:08

pbaggett

17-Mar-06 11:08

application.exit does not appear to do anything - is there another way to cancel a running process and kill the application?

Re: application.exit

Dave Kreskowiak17-Mar-06 12:40

How to display a result of query into a textbox?

17-Mar-06 12:40

If you spawn other threads to do work in your app, you have to shut them down before your app will actually exit.

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

i need some help

hkm113917-Mar-06 8:36

hkm1139

17-Mar-06 8:36

Hello everyone
i'm working on a project where i want to get a file from a remote Pc via telephone network.
my way to transfare the file is the remote pc to open the file as binary and reads a number of bytes and then send them.
the problem i'm facing is the number of bytes to read from the file.
i'm using currancy type in reading from the file because it can hold 8 bytes
i need to know how can i declare a variable that can hold mor than 8 bytes (50 bytes for example)i also want to know how can i make a processing on these bytes like making an error check procedure or adding sum bits to them.
note: the strig type didnit work with me

Re: i need some help

Christian Graus17-Mar-06 8:53

Christian Graus

17-Mar-06 8:53

You need to create a byte array.

Christian Graus - Microsoft MVP - C++

wliong17-Mar-06 8:33

Re: How to display a result of query into a textbox?

17-Mar-06 8:33

Hi,

I run a query below, but I don't know what the data is. How canI show the result of the query into a textbox?

Thanks a lot.

MyQuery7 = "SELECT Top 1 JOBACTIV.[STARTDATE] FROM [JOBACTIV] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') UNION ALL SELECT Top 1 JOBARC.[STARTDATE] FROM [JOBARC] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY 1"

Christian Graus17-Mar-06 8:54

Christian Graus

17-Mar-06 8:54

All you've done here is define a query as a string. This does not give you any data, or even call the database.

Christian Graus - Microsoft MVP - C++

Re: How to display a result of query into a textbox?

Guffa17-Mar-06 8:56

Guffa

17-Mar-06 8:56

Don't start a new thread for follow-ups.

---
b { font-weight: normal; }

How can I fix this query?

wliong17-Mar-06 5:50

17-Mar-06 5:50

Hi,

I'm trying to query 2 data (in forms of date) from 2 tables in MS Access. Then from those 2 date, I will compare and get the earliest date.
I tried the code below, but the problem is that if one of the query doesn't have the data, they couldn't make the comparison and could not display the other data. How can I fix this?

Thank you very much.

MyQuery7 = "SELECT Top 1 JOBACTIV.[STARTDATE] as strdt FROM [JOBACTIV] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY JOBACTIV.[STARTDATE]" <br />
<br />
MyQuery8 = "SELECT Top 1 JOBARC.[STARTDATE] as strdta FROM [JOBARC] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY JOBARC.[STARTDATE]" <br />
<br />
Set rs7 = db2.OpenRecordset(MyQuery7) <br />
Set rs8 = db2.OpenRecordset(MyQuery8) <br />
<br />
If rs8.Fields("strdta") < rs7.Fields("strdt") Then <br />
txtSupStartDate.Text = rs8.Fields("strdta") <br />
Else <br />
txtSupStartDate.Text = rs7.Fields("strdt") <br />
End If <br />
<br />
rs7.Close <br />
rs8.Close

Guffa17-Mar-06 6:26

Guffa

17-Mar-06 6:26

Use UNION ALL to put the queries together, then sort by date so that you will get the earliest date first.

SELECT TOP 1 STARTDATE FROM JOBACTIV WHERE ...<br />
UNION ALL<br />
SELECT TOP 1 STARTDATE FROM JOBARC WHERE ...<br />
ORDER BY 1

---
b { font-weight: normal; }

wliong17-Mar-06 6:48

17-Mar-06 6:48

I try this query, but I don't know how to see the result. How can I display the result to a textbox?
is it something like "txtdate.text = rs7.fields"?
Thanks.

MyQuery7 = "SELECT Top 1 JOBACTIV.[STARTDATE] FROM [JOBACTIV] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') UNION ALL SELECT Top 1 JOBARC.[STARTDATE] FROM [JOBARC] WHERE [MFRNAME] LIKE ('" & txtManufacturer.Text & "*') AND [SUPADDR3] LIKE ('" & txtAddress2.Text & "*') ORDER BY 1"

Guffa17-Mar-06 8:57

Guffa

17-Mar-06 8:57

Just get the value like you did before. The name of the field is "STARTDATE".

---
b { font-weight: normal; }

wliong17-Mar-06 9:20

Problems with picture on a video

17-Mar-06 9:20

thank you very much.
It works.

Registry in dotNet

aransiola17-Mar-06 5:31

aransiola

17-Mar-06 5:31

What are the dotNet equivalent functions for reading and writing registry values and keys?
Savesetting
GetSetting
GetAllSetting

tunde aransiola

Re: Registry in dotNet

Tim Carmichael17-Mar-06 5:43

Tim Carmichael

17-Mar-06 5:43

As a start...
My.Computer.Registry object

Highlight Textbox

aransiola17-Mar-06 5:29

aransiola

17-Mar-06 5:29

I am using vb.net
How do the content of the textbox get highlighted when the textbox get focus? i have tried something like this

textbox.selstart=0
textbox.sellength=len(textbox.text)

but the textbox is not highlighted

tunde aransiola

Re: Highlight Textbox

CWIZO17-Mar-06 6:29

CWIZO

17-Mar-06 6:29

Humm I tryed different methods including TextBox.SelectAll() and suprisingly non works.

Does anybody have any clue as to why is this so?

Q:What does the derived class in C# tell to it's parent?
A:All your base are belong to us!

Re: Highlight Textbox

aransiola19-Mar-06 7:05

aransiola

19-Mar-06 7:05

use the Sender.SelectAll property in the
Textbox_Enter event procedure
it will work

tunde aransiola

Re: Highlight Textbox

progload17-Mar-06 7:15

progload

17-Mar-06 7:15

Set "HideSelection" property false. (VB.Net)

MAP Tiger17-Mar-06 5:07

MAP Tiger

17-Mar-06 5:07

Hi Pals

I am working on vb.net 2005 windows forms project. In this I have placed "Windows Media Player" control n docked it to full and the next thing I did that I have placed a picture box control over that control n then issued a picture that is transparent but it didnt work as picture had the effect of blur n is not stable.

So next i made a new form n made it transparent with no border style n top most n then placed a picturebox control n docked it full n set its background color to the transparent color of the form. well it worked better than the prvs but still it is not stable n blurring.

I am using transparent PNG or GIF image file formats.

Please anyone help me in this regard.

thanks in advance.

MAP Tiger

Re: Problems with picture on a video

Dave Kreskowiak17-Mar-06 5:23