|
Using the following code:
Private Sub LkSplitsGrid1_DragEnter(ByVal sender As Object, ByVal e As System.Windows.Forms.DragEventArgs) Handles LkSplitsGrid1.DragEnter<br />
If e.Data.GetDataPresent(DRAGITEM) Then<br />
e.Effect = DragDropEffects.Copy '(A)<br />
ElseIf e.Data.GetDataPresent(DRAGELEMENT) Then<br />
Try<br />
Dim c As LKVariable = CType(e.Data.GetData(DRAGELEMENT), LKVariable)<br />
e.Effect = DragDropEffects.Move '(B)<br />
Catch<br />
e.Effect = DragDropEffects.None<br />
End Try<br />
Else<br />
e.Effect = DragDropEffects.None<br />
End If<br />
End Sub
I wish to have the DragDropEffects to be set to "move" but if I set the first instance of it (A) to "move" the cursor won't change. If I set (A) to "copy" and (B) to "copy" the (B) code doesn't change the cursor, ie. it is is the "none" cursor. Why is that?
Rugby League: The Greatest Game Of All.
|
|
|
|
|
When you initiated the drag drop operation with the DoDragDrop, what effect(s) did you specify?
Cheers
Tom
|
|
|
|
|
Hi,
I am new to vb.net, actually i want to receive mail from my mail server in vb.net without using any third party utility(control). I heard that using sockets we can do. if you know anyother way to receive mail in vb.net, Could any one pls help me with code. It's urgent requirement for me.
My email id is jith_n@yahoo.com
Thanks,
J R
|
|
|
|
|
Hi.
I am just involved in writing a program (MUST BE IN VB6) that works with access databases.
I know what to do in order to get, set or update data.
My problem is to print some reports from the data.
I don't know wether I should make the report and it's form to be printed myself or there is some methods to generate a report like what is in access itself.
Thanks in advance
|
|
|
|
|
You could use the Data Report Designer.
If you use the Data Environment Designer to set up the data source, you can use the Report Designer to lay out the design of the report.
You would need the Add Data Report to appear on the Project menu. If it doesn't, do the following...
Open Components dialog box, click Designers tab, select Data Report.
Once you add the Data Report to your project, all you have to do is set its properties.
I hope this helps.
Larry Bray
|
|
|
|
|
Thank you Larry!
It was quite helpful.
|
|
|
|
|
I have tried ever thing under the sun and the moon and I don't get I am trying to write a code that counts the number charcters, number of words, number of sentences, and number paragrahgs contained in a string.
|
|
|
|
|
Huh?
Guess not understood your problem exactly, but:
using Len() function, you can find out number of characters inside a string. counting number of dots (.) you can find the number of sentences. counting the number of enters (chr(13)) you can find number of paragraphs.
(just there should be some verifications to see for example if a dot (.) is a dot in a number (2.34) or not or some other things. and it is easy to check)
I dunno if I have answered your question or not!
|
|
|
|
|
I’m having a hard time manipulating a string...
How can I remove everything to the left of a given string in a string?
Example:
‘This is my main string. It is always different’.
I want to trim everything to the left of ‘string.’ Including ‘string.’ So that my new string reads:
‘It is always different.’
The word ‘string.’ will always be part of the string.
Thanks
Brad
|
|
|
|
|
Hey
You can use this
Dim i As String = "This is my main string. It is always different"
Dim a() As String
a = i.Split("string.")
a(0) = "This is my main"
a(1) = "It is always different"
The string you then need is a(1)
Have a look at this[^] article
Hope this helps
Chris
|
|
|
|
|
Hi Chris.
I actually tried that but instead of splitting the string at 'string.' it splits it every time it finds one of the letters in 'string.' I thought it was a simple concept until I started trying to use 'split' to make it work.
Thanks.
Brad
|
|
|
|
|
I am trying to create a small app that will handle all of my Vnc and Vpn connection needs (over 40 diffrent connections). What im looking to do is to create and application which holds the connections and sits in the system tray until a right click then a menu with my options. Creating the system tray application is where im having problems, any help would be appreciated.
p.s. newbie here.
|
|
|
|
|
I have the following code, but I cannot seem to get the changes in the dataset to be commited to the database. All I get is a 0 rowcount:
Private editQry As String = "select idc,nomiko,Eponymo,Onoma,Tel from Persons where idc=1"
Private adoCEDataAdapter As SqlCeDataAdapter
Private CustEditDataSet As DataSet
Private cb As SqlCeCommandBuilder
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Me.Close()
End Sub
Private Sub frmCustEdit_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
adoCEDataAdapter = New SqlCeDataAdapter(editQry, frmConnect.adocon)
cb = New SqlCeCommandBuilder(adoCEDataAdapter)
CustEditDataSet = New DataSet
adoCEDataAdapter.Fill(CustEditDataSet)
txtSurname.DataBindings.Add(New Binding("Text", CustEditDataSet.Tables(0), "Eponymo"))
txtName.DataBindings.Add(New Binding("Text", CustEditDataSet.Tables(0), "Onoma"))
txtTel.DataBindings.Add(New Binding("Text", CustEditDataSet.Tables(0), "Tel"))
cbLegal.DataBindings.Add(New Binding("SelectedIndex", CustEditDataSet.Tables(0), "nomiko"))
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
MsgBox(adoCEDataAdapter.Update(CustEditDataSet).ToString())
Me.Close()
End Sub
I have tried to create the Update query with:
adoCEDataAdapter.UpdateCommand=cb.GetUpdateCommand
and it returns a query, but again nothing happens on the adoCEDataAdapter.Update(CustEditDataSet)
Help....
|
|
|
|
|
can any one help me to come out from this problem.
i want to use mouse scroll buttons to scroll inside flexgrid control (VB.NET).
thanks in advance!
|
|
|
|
|
can any one help me to come out from this problem.
i want to use mouse scroll buttons to scroll inside flexgrid control (VB.NET).
thanks in advance!
|
|
|
|
|
Hi,
Is there a way to run a program when a cd is put in the drive using either vb 6 or vb.net. I am not looking to autorun the cd.
|
|
|
|
|
This is something that is on my “To Do” list also. I want to make a CD Autorun an html file that is located on the CD but I haven’t had time to look into it yet.
The first thing that I was going to do was check to see if I could make an AutoRun.ini file that points to my html file. Maybe this same concept will work if you direct the AutoRun.ini to your programs exe file.
Brad
|
|
|
|
|
Hi,
Actually what I want to do is a little different. I have cds that are already made and I want a windows based program to run when a cd is inserted into the drive. I cannot put anything else on to the cd. I need to start a program of my own. Its a bit like when you put a cd in when using Windows XP. A window is displayed asking you what you want to do ie play it or do nothing. Except I will be running the program under windows nt and windows 2000. Hope I've made scense
|
|
|
|
|
Hmmm....now I understand exactly what you want to do but I’m not sure how to make it happen.
There are some very intelligent people in this User Group. Hopefully someone will have an answer for you.
If I find any useful information while I’m trying to figure out how to AuotRun my html I'll let you know.
Brad
|
|
|
|
|
Thanks. By the way there is a free program out there that allows you to autorun any file. If i can remember the link i will post it here
|
|
|
|
|
Thanks. That would be great!
Brad
|
|
|
|
|
Here is the link to one program. I have another one put i can't remember it until i get home.
http://www.jsconsulting.com/prod04.htm
|
|
|
|
|
Thanks!
You just saved me a lot of time 
Brad
|
|
|
|
|
|
Hi,
In migrating from vb6 to vb.net, could not the alternative for
"UserControl.Hyperlink.Navigateto(param)" Can anybody provide help on this, I have tried MSDN but no use can anybody help me out please???????
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
