Re: SetCursor - Visual Basic Discussion Boards

Anonymous1-Jan-03 15:30

1-Jan-03 15:30

I want to write a client program(.dll). The Client Program Will response whe message from IE. When I visit a special document from address of IE,My application will run and open the document.Example: When I visit a file of the extend name is '.rm' from IE , the realplay whill run and open the file.
BUT I don't know how to response whe message from IE.

Re: help me,about activex document

iluha4-Jan-03 6:48

iluha

4-Jan-03 6:48

I have project that I found on a Russian web site, that registers it self as a service and monitors the microsoft internet explorer. It will only work under windows 98. it suppose to work under 95 but it does not. email me at ilya@pokrovskiys.com if you want this project.
It might be what your are looking for.
You might find a way make it work under xp and 2000

how to create a configuration file??

Nashes1-Jan-03 8:10

Nashes

1-Jan-03 8:10

hi to ya'll..want to ask a ques..ok lets say i have an Linux operating system and i want to write a configuration file into the system that can read the data entered by the user(data enter by user is done using VB, VB is used to create the interface and then vbscript is used to generate a text file. The text file contains all info entered by the user. This text file is then sent to the Linux OS, and a configuration file in the os is used to validate the info entered).Ok, my ques is what language am i going to use, and how am i going to do it?

Nash Hon

Remoting File Transfer

SHaroz30-Dec-02 6:32

SHaroz

30-Dec-02 6:32

I can send a file from the server to the client by having the client call a function which returns a FileStream. It works perfectly.

I tried to send a file from the client to the server by having the client call a function with a filestream as a parameter. Unfortunately, the client gives me an error saying the the remoting proxy has no channel sink. Confused | :confused:

The client's call:

T.SendFileTest2(New FileStream("C:\in2.txt", FileMode.Open))

The function in the hosted object:

Public Function SendFileTest2(ByVal FSL1 As FileStream) As Boolean
    Dim Buffer(4096) As Byte
    Dim readed As Integer
    Do
        readed = FSL1.Read(Buffer, 0, 4096)
        Dim i As Integer
        Dim str As String
        For i = 0 To readed - 1
            str += Convert.ToChar(Buffer(i))
        Next
        MsgBox(str)
    Loop Until readed < 4096
    FSL1.Close()
    FSL1 = Nothing
End Function

I would greatly appreciate any help on this.

Thanks,
Steve

How to using the second IDispatch of a COM object

bojinyu30-Dec-02 0:07

bojinyu

30-Dec-02 0:07

I design a COM object by ATL, which has two IDispath. Default dispatch is IPlot2D, and the second is IMIDraw.
IMIDraw has a method Plot(), how do I launch Plot() method?

Detect connection to the Internet.

dayWalker28-Dec-02 6:51

dayWalker

28-Dec-02 6:51

How can I check if a user is connected to the Internet. I used the function 'InternetGetConnectedState' but it does not work with IE 6 and WinXP. Any help is more than welcome !

*** Praise none, but the Creator ***
T-break SUX

SetCursor

UrbanBlues27-Dec-02 22:19

UrbanBlues

27-Dec-02 22:19

Hi VB Experts

Normally, I'm using C++ for my developmments but I need to configure a supervision software that makes a heavy use of VBA ... so I apologize for my stupid question...

This supervision software allows us to make views of industrial processes. These vies are NOT use classical VB forms. So the methods of the VB forms are not available .... I need to set the cursor to hourglass for lengthy processing but I failed to succed.

I declared the functions SetCursor and LoadCursor as 'Private Declare Function SetCursor Lib "user32" .... and same for LoadCursor

Then I try to get the cursor with the call:

SetCursor( LoadCursor( 0, 32514&))

But it does not work !!!

What shoudl I do to succeed ?

Thanks for your help

Thierry

Re: SetCursor

Jeremy Falcon31-Dec-02 12:07

Jeremy Falcon

31-Dec-02 12:07

Here...

HOW TO: Change the Cursor in an eMbedded Visual Basic Application[^]

It's for eVB, but it still should do the trick for ya.

Jeremy Falcon
Imputek

<nobr>Excrement escapes everyone - even elders.

Re: SetCursor

MikeUofPhx6-Jan-03 14:58

MikeUofPhx

6-Jan-03 14:58

I have zero experience with vb for applications, but in regular dot net you don't need anything but this one line:
Cursor.Current = Cursors.WaitCursor
Then
Cursor.Current = Cursors.Arrow

Hope this helps,
Mike "MC5" C

Project file and exe file

Nick Seng27-Dec-02 16:37

Nick Seng

27-Dec-02 16:37

This is using vb6...

Help I've just encountered some problem with my application. When i am running my application from the Project file, everything works fine, but when i made the exe file, a run-time error occurs when i run some process.

Does anyone know the error only occurs in the exe and not the project file?

btw, the error occurs regarding the sort method of the range class of the excel object

Notorious SMC

The difference between the almost-right word & the right word is a really large matter - it's the difference between the lightning bug and the Lightning
Mark Twain

Get your facts first, and then you can distort them as much as you please
Mark Twain

dll access

brieg100027-Dec-02 12:40

brieg1000

27-Dec-02 12:40

I am writing an application, where a third party company is writing some components. My question is this: My boss is under the impression that a DLL can be dropped into the bin folder and we can run with it (i.e.: access properties/methods within the DLL) I tried dropping the DLL into my bin folder, then adding an Import in the projects property pages, to no avail. Does anyone know of anyway besides reflection that this can be done ??

Re: dll access

mikasa8-Jan-03 6:40

mikasa

8-Jan-03 6:40

Yes, Add a Reference to it...

Right-click on your References Section of your Project and Click "Add Reference...". Then browse to where you put it.

Load at Start up !

dayWalker27-Dec-02 0:01

dayWalker

27-Dec-02 0:01

I'm making this application in VB.NET. I call it netDemon, it monitors a users Connection time and creates a log. I'm facing few problems rite now. I'm listing them with detail.

Firstly, I'm using Access as my database so that I can store the logs. The problem is that I cannot Insert a new tuple in my Database. I can update an existing tuple but fail to Insert. I'm using the following SQL query:

INSERT into users values ('" & myUser & "','" & myPass & "'," & myPriv & ",'desc');"

where myUser contains the value entered into the textfield and myPass is the password.

Secondly, my application is designed in such a way that it will disconnect any connection that is not made through it. The problem is that even though I'm not connected to the Internet the application keeps showing me a message that I'm connected to the Internet.
I'm using the Function 'InternetGetConnectedState'. According to what I read at 'AllAPI.net' this function returns ture when connected and false otherwise. Here's what I've written:

myCheck = du.InternetGetConnectedState(lpdWFlags, 0)
If (myCheck) Then
If (isConnected = False) Then
'MsgBox("You cannot connect to the Internet, except through netDemon")
MsgBox("You will now be disconnected")
du.InternetAutodialHangup(0)
End If
Else
'If he is not Connected, then do nothing Big Grin | :-D

End If

'isConnected' is a Globlal variable of type boolean which is set to 'true' when the user logs onto my application.

Lastly, I want my application to load when Window's loads. How do I do this.
Using VB.NET @ WinXP Pro.
This is very, very urgent cause I have to submit this project by Thursday (09-01-2003) Roll eyes | :rolleyes:

. Please reply A.S.A.P ... Big Grin | :-D

Adapter.Fill ?

Nick Seng26-Dec-02 17:10

Nick Seng

26-Dec-02 17:10

Using VB.net

Can somebody help me? I'm using vb to connect to MySQL through ODBC using the following code

<br />
Dim Con as New ODBCConnection("some connection")<br />
Dim Adp as New ODBCDataAdapter<br />
Dim ds as New DataSet()<br />
<br />
Con.Open()<br />
Adp.SelectCommand.Connection = Con<br />
Adp.SelectCommand.CommandText = "SELECT * FROM tablename"<br />
Adp.Fill(ds,"tablename")<br />

The error occurs at the Fill with message: NO_DATA, but if I use ExecuteReader instead, there's no error and the data's there.

Is there something wrong with the code? Or is there something I should know about the Microsoft.Data.Odbc namespace? Please Help!

Notorious SMC

Upgrade to Visual Studio 2003?

James Williams26-Dec-02 7:24

James Williams

26-Dec-02 7:24

Microsoft just recently announced that the "Everett" version of .Net will be released as .Net 2003. The beta version is available for download on their dev site. They have not said anything about upgrade policies for current owners of .Net. Does anyone have any info on this yet?

Re: Upgrade to Visual Studio 2003?

Michael P Butler26-Dec-02 7:43

Michael P Butler

26-Dec-02 7:43

For Visual Studio .NET 2002 customers who do not subscribe to MSDN or to a Microsoft volume licensing program, Microsoft is committed to providing an inexpensive path to "Everett." Registered users of Visual Studio .NET 2002 will be able to license "Everett" for $29 US, the cost of materials, shipping and handling, for a limited time after release. Availability will be roughly concurrent with Windows .NET Server 2003. For those customers who prefer not to upgrade to Visual Studio "Everett," a service pack offering only bug fixes for Visual Studio .NET 2002 will be available soon after the "Everett" release.

from

http://msdn.microsoft.com/vstudio/productinfo/roadmap.asp[^]

Michael

Fat bottomed girls
You make the rockin' world go round -- Queen

Could anybody help me in visual basic

suresh_sathya25-Dec-02 23:27

suresh_sathya

25-Dec-02 23:27

I am doing something on my IExplorer.I have the form which set as
automaximize is true for every say 1 hour.So every 1 hour my form
awakes.Suppose if it gets activated,my focus will go from IE to vbform.how
to avoid this.i want to do my focus again to my IE.How to do.

1.i want API to activate another application.

2. i want to get the handle of the deactivation window, so that again i
activate the window.

How can I bind data to Groupbox of radiobuttons

intibnin24-Dec-02 22:57

intibnin

24-Dec-02 22:57

Hi,
Please I need help,

I have a groupbox that contains 2 radiobuttons. So i want to bind to it a datafield (having only 2 values : 1 for the first radiobutton, or 2 for the second radiobutton).

Please can someone show me how to use databinding with this groupbox.

Thank you in advance.

Intibnin...

***

Re: How can I bind data to Groupbox of radiobuttons

Tatham26-Dec-02 6:31

Tatham

26-Dec-02 6:31

From what I understand in your message, you have:

Form
- GroupBox
- RadioButton1
- RadioButton2

You also have a dataset where each row has 1 column (or more). If this column has a value of 1 you want RadioButton1 to be selected, otherwise RadioButton2.

Can you clarify your situation a bit more? Are you using typed/untyped datasets? Are you using C#, VB, or J#?

I dont see how this isn't just basic databinding - and if it is you'd be better off checking MSDN for the documentation on DataBinding.

Tatham Oddie (VB.NET/C#/ASP.NET/VB6/ASP/JavaScript)
tatham@e-oddie.com
+61 414 275 989

Re: How can I bind data to Groupbox of radiobuttons

intibnin26-Dec-02 20:45

intibnin

26-Dec-02 20:45

Thank Tatham for help.

Well, the problem i encountred is in VB.NET Form.
I try to clarify the problem, so the dataset used in form is filled programmatically. I create a method for binding fields to dataset as follows :

Private Sub BindingFields()
cn = New SqlClient.SqlConnection(constring)
Dim da As New SqlClient.SqlDataAdapter("select * from parametres where type = 1 order by code ", cn)

'Note : Mydataset, MyBuilder and MyAdapter are declared public objects

Mydataset = New DataSet()
MyAdapter = New SqlClient.SqlDataAdapter("select * from client", cn)
MyBuilder = New SqlClient.SqlCommandBuilder(MyAdapter)
MyAdapter.Fill(Mydataset, "client")

TextBox1.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.r01_codcli"))
TextBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.r01_adrcli"))
TextBox3.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.tel1"))
TextBox4.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.r01_nomcli"))
TextBox5.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.tel2"))
TextBox6.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.fax"))
TextBox7.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.dat_cre"))
da.Fill(Mydataset, "Categorie")
ComboBox1.DataSource = Mydataset
ComboBox1.DisplayMember = "Categorie.libelle"
ComboBox1.ValueMember = "categorie.cat_cli"

'*****************************
'The problem is here
'Client.stop_serv is 1 or 2
'******************************
GroupBox2.DataBindings.Add(New System.Windows.Forms.Binding("Text", Mydataset, "client.stop_serv"))

End Sub

this code does not work.

Thank you in advance

***

Re: How can I bind data to Groupbox of radiobuttons

Tatham26-Dec-02 20:55

Tatham

26-Dec-02 20:55

Either:

RadioButton1.DataBindings.Add(New System.Windows.Forms.Binding("Value", Mydataset, "client.stop_serv1"))<br />
<br />
RadioButton2.DataBindings.Add(New System.Windows.Forms.Binding("Value", Mydataset, "client.stop_serv2"))

Or, can you just use a check box and bind the Checked property?

Tatham Oddie (VB.NET/C#/ASP.NET/VB6/ASP/JavaScript)
tatham@e-oddie.com
+61 414 275 989

How Can i detect return key in datagridTextBoxColumn

intibnin24-Dec-02 22:49

intibnin

24-Dec-02 22:49

Hi,
Please I need help.
I created a form that allows me searching customers by name. after display customers list in datagrid, i want allow user to select one customer by pressing key.
for grid setup, i tried the following code :

'Configuration de la grille
Private Sub DataGridSetup()
Dim ts As New DataGridTableStyle()
Dim cs As New DataGridTextBoxColumn()
AddHandler cs.TextBox.KeyPress, AddressOf CellKeyPress
DataGrid1.ContextMenu = ContextMenu1
DataGrid1.CaptionText = "Résultat"
ts.MappingName = "mycli"
cs.MappingName = "c_cli"
cs.HeaderText = "Code"
cs.Alignment = HorizontalAlignment.Center
ts.GridColumnStyles.Add(cs)
cs = New DataGridTextBoxColumn()
cs.MappingName = "N_cli"
cs.HeaderText = "Nom/Raison sociale"
ts.GridColumnStyles.Add(cs)
DataGrid1.TableStyles.Clear()
DataGrid1.TableStyles.Add(ts)
End Sub

and i added handler to datagridtextboxcolumn, for detecting the keypress events as follows :

'Ajout d'un évènement aux cellules
Public Sub CellKeyPress(ByVal Sender As Object, ByVal e As KeyPressEventArgs)
Dim dt As DataTable = ds.Tables("mycli")
Dim p As Integer
CodeClient = Space(11)
If e.KeyChar = Chr(13) Then
p = Me.BindingContext(ds, "mycli").Position
CodeClient = dt.Rows(p)("c_cli")
Me.Close()
End If

End Sub

So after writing this code, i can select one customer only after pressing SHIFT+RETURN.

please can you explain me way i must first press
SHIFT.

Thank you very match.

Intibnin...

***

Re: How Can i detect return key in datagridTextBoxColumn

Tatham26-Dec-02 6:44

Tatham

26-Dec-02 6:44

The return key is captured to end edits. If you begin editing a DataGridTextBoxColumn and then press enter the edit will end.

If you want to override this you'll have to be really careful or edits or use the column as read-only.

The easiest (maybe only) way to do this would be to creat your own wrapper which inherits the DataGridTextBoxColumn class. Eg:

Public Class DataGridTextBoxSelectorColumn<br />
    Inherits DataGridTextBoxColumn<br />
<br />
    Public ...<br />
End Class

From here you should be able to override the key events. Be careful that if your not going to actually do anything on the event that you call the equivalent MyBase.whatever event.

Tatham Oddie (VB.NET/C#/ASP.NET/VB6/ASP/JavaScript)
tatham@e-oddie.com
+61 414 275 989

Re: How Can i detect return key in datagridTextBoxColumn

intibnin30-Dec-02 4:55

intibnin

30-Dec-02 4:55

Hi Tatham,

Thank you for your help.

I tried your code bu it doesn't work.

if you can clarify more.

I attract your attention that the return key is completely omitted in the datagrid and all the other keys work correctly. Probably because <enter> key appears in the list of keyboard shortcut of the datagrid control

thank you for advance.
intibnin
***

Re: How Can i detect return key in datagridTextBoxColumn

Tatham30-Dec-02 5:03

Tatham

30-Dec-02 5:03

Sorry, I cant really help much more. I dont have any other ideas.

Tatham Oddie (VB.NET/C#/ASP.NET/VB6/ASP/JavaScript)
tatham@e-oddie.com
+61 414 275 989

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.