Drag/Drop

[cas21]

Does anyone have coding that will work for dragging info from my form's text boxes, to text boxes on another form(say, a fill in form on various internet registration forms?

[dimava]

this might work...

'paste this code into form2
Private Sub Text1_DragDrop(Source As Control, X As Single, Y As Single)
text1.text = form1.text1.text
End Sub

[Joacim Andersson]

Just set the OLEDragMode property to 1 - Automatic and the OLEDropMode property to 2 - Automatic. This will do the trick.