Visual Basic

eagertolearn wrote:

but when i try to write sth on the textbox, it's doing a weird thing.

Dim obj1 As New Foo<br />
Dim obj2 As Foo = DirectCast(obj1.Clone(), Foo)

Public Class Bar : Implements ICloneable
   Public Data As Integer ' Value types are always copied.

   Public Function Clone() As Object Implements System.ICloneable.Clone
      Return Me.MemberwiseClone()
   End Function
End Class

Public Class Foo : Implements ICloneable
   Public Bar As New Bar ' Referenced objects are not copied.

   Public Function Clone() As Object Implements System.ICloneable.Clone
      Dim copy As Foo = DirectCast(Me.MemberwiseClone(), Foo)
      copy.Bar = DirectCast(Me.Bar.Clone(), Bar) ' Clone member object too.
      Return copy
   End Function
End Class

haggisns wrote:

One of the DTS packages deletes a database, however if there is a remote connection
to the database , the DTS package to delete it will fail, as expected.

BambooMoon wrote:

SELECT syslocks.id FROM syslocks, sysdatabases WHERE (syslocks.dbid = sysdatabases.dbid) AND (sysdatabases.name = 'your-database-name')