jueves, 26 de julio de 2018

cmd.exe windows 10

-Administrador de tareas
-Archivo
-Ejecutar nueva tarea
-Abrir: cmd.exe

Se encuentra en C:\Windows\System32\cmd.exe

martes, 24 de julio de 2018

Mostrar contraseña TextBox







Public Class clave

    Private passChar As Char = "?"

    Private Sub clave_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        TBclave.PasswordChar = passChar
    End Sub

    Private Sub CBclave_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CBclave.CheckedChanged
        If CBclave.Checked Then
            TBclave.PasswordChar = ""
        Else
            TBclave.PasswordChar = passChar
        End If
    End Sub

End Class


lunes, 23 de julio de 2018

Cursor del mouse desaparece al escribir en TextBox RichTextBox

Private Sub TextBox_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbRutEmpresa.TextChanged
        Me.Cursor = Cursors.Default
    End Sub

    Private Sub TextBox_MouseEnter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbRutEmpresa.MouseEnter
        Me.Cursor = Cursors.Default
    End Sub

    Private Sub TextBox_MouseLeave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles tbRutEmpresa.MouseLeave
        Me.Cursor = Cursors.Default
    End Sub


fuente

miércoles, 11 de julio de 2018

No update ListBox al desplegar ComboBox

Private Sub lbtablas_Leave(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles lbtablas.Leave
        ListBox.Update()
    End Sub

fuente

Borrar todos los nodos hijos xml

Dim doc As New XmlDocument
doc.Load("ruta_archivo_xml")
Dim x As XmlNode = doc.SelectSingleNode("Data/VariablesSql")
x.RemoveAll()
doc.Save("ruta_archivo_xml")

Comobox no actualiza index

Combobox.ResetText
Combobox.SelectedIndex = - 1

o también

Combobox.SelectedIndex = Nothing
Combobox.SelectedIndex = -1

lunes, 9 de julio de 2018

Vistas de una base de datos

SELECT TABLE_NAME FROM INFORMATION_SCHEMA.VIEWS ORDER BY TABLE_NAME ASC

viernes, 6 de julio de 2018

Tipo de dato de cada columna sql

SELECT COLUMN_NAME,DATA_TYPE
FROM INFORMATION_SCHEMA.COLUMNS
WHERE TABLE_NAME = 'dbo.table'

SELECT DATA_TYPE
FROM INFORMATION_SCHEMA.COLUMNS
WHERE
     TABLE_NAME = 'tabla' AND
     COLUMN_NAME = 'columna'

miércoles, 4 de julio de 2018

Obtener los campos de una tabla

SELECT name FROM sys.columns WHERE object_id = OBJECT_ID('dbo.tabla')

SELECT * FROM nombre_base_de_datos.INFORMATION_SCHEMA.COLUMNS
WHERE TABLE_NAME = 'dbo.tabla'

fuente

Obtener las tablas de una base de datos

SELECT name FROM [BASE_DE_DATOS].sys.tables WHERE is_ms_shipped=0

Otro ejemplo (se demora más)

select name from sysobjects where
    OBJECTPROPERTY(id,N'IsTable')=1 and
    OBJECTPROPERTY(id,N'IsMSShipped')=0

fuente
fuente1