Una manera rápida de saber el primer día del mes de una fecha dada puede ser la siguiente:
Dim rtn As New Date
rtn = Date.Now
rtn = rtn.AddDays(-rtn.Day + 1)
Una manera rápida de saber el primer día del mes de una fecha dada puede ser la siguiente:
Dim rtn As New Date
rtn = Date.Now
rtn = rtn.AddDays(-rtn.Day + 1)
En ocasiones se necesita copiar datos entre datatables, aqui pongo una manera facil de poder hacer estas operaciones.
Primero se declaran 2 datatables, el primero obtendra los resultados de un query, y por consecuencia tendra un numero determinado de columnas, se pone un ciclo para copiar el numero de columnas al 2do datatable y posteriormente se hace el copiado de datarows entre ambos
Dim DataTableLeer As New DataTable
Dim DataTableLeer2 As New DataTable
Dim selectcmd As New SqlClient.SqlDataAdapterDim conn As New SqlClient.SqlConnection(String.Format(“Data Source='{0}’;Initial Catalog='{1}’;User Id= ‘{2}’;Password ='{3}’;”, server, database, username, password))
conn.Open()
DataTableLeer.Clear()selectcmd = New SqlClient.SqlDataAdapter(String.Format(“Select * from tabla “), conn)
selectcmd.Fill(DataTableLeer)For i As Integer = 0 To DataTableLeer.Columns.Count – 1
DataTableLeer2.Columns.Add(DataTableLeer.Columns(i).ColumnName)
NextDataTableLeer2.Rows.Add(DataTableLeer.Rows(0).ItemArray)
espero sea de utilidad
saludos
En algunas ocasiones es necesario mandar un correo electronico desde tu aplicacion, esto de manera automatica y en ocasiones sin que te avise.. aqui les escribo una manera rapida de hacerlo para una cuenta de correo de GMAIL
Public Sub sendmail()
Dim Mensaje As New System.Net.Mail.MailMessage()
Dim Servidor As New System.Net.Mail.SmtpClientServidor.Credentials = New System.Net.NetworkCredential(“correofuente@gmail.com”, “contraseniadegmail”)
Servidor.Host = “smtp.gmail.com”
Servidor.Port = 587
Servidor.EnableSsl = True
Continue reading
Como alguno saben y otros apenas se enteran(como es mi caso), en un datatable de VB .NET se pueden guardar distintos tipos de datos e inclusive Objetos, sin embargo, antes de agregar valores hay que declarar primero que tipo de valor se guardará para dicha columna, ya que en caso de no hacerlo por defecto se guardan como tipo String.
Para asignar un tipo de dato a una columna de un DataTable solamente hay que hacer lo siguiente