VB .NET


XML a ADO .NETProgram
Datum a ΦasProgram
Prßce s textemProgram
Je instalovßn MS Office?K≤d
Atributy souboruK≤d
Verze WindowsK≤d

XML a ADO .NET
Ukazuje, jak nahrßt XML stream do ADo DataSetu, pou₧itφ meotyd GetXML a zobrazenφ XML v r∙zn²ch formßtech v prohlφ₧eΦi.
2769 bajt∙Kopφrovat

Zp∞t na obsah


Datum a Φas
P°φklad pou₧itφ objektu DateTime a jeho formßtovacφch mo₧nostφ v ASP .NET strßnce.
4938 bajt∙Kopφrovat

Zp∞t na obsah


Prßce s textem
N∞kolik funkcφ pro prßci s textem, nap°. binßrnφ vyhledßvßnφ, t°φd∞nφ (bubble a merge sort) atp.
54013 bajt∙Kopφrovat

Zp∞t na obsah


Je instalovßn MS Office?

Chcete-li v∞d∞t, zda je instalovßna n∞kterß aplikace z balφku MS Office, pou₧ijte nßsledujφcφ jednoduch² trik s registrem.

Dim strSubKey As String
Dim objKey As RegistryKey = Registry.ClassesRoot
Dim objSubKey As RegistryKey

strSubKey = "Access.Application"
'strSubKey = "Excel.Application"
'strSubKey = "Word.Application"

objSubKey = objKey.OpenSubKey(strSubKey)
If objSubKey Is Nothing Then
  MsgBox("Access nenφ instalovßn.")
Else
  MsgBox("Access je instalovßn.")
End If
objKey.Close()

Zp∞t na obsah


Atributy souboru

Atributy souboru zjistφte volßnφm metody GetAttributes objektu File. Zjistit, zda je soubor nap°. skryt² je velmi jednoduchΘ.

If (System.IO.File.GetAttributes("c:\autoexec.bat") And _
    System.IO.FileAttributes.Hidden) = System.IO.FileAttributes.Hidden Then
    MsgBox("Autoexec.bat je skryt² soubor")
Else
    MsgBox("Autoexec.bat nenφ skryt² soubor")
End If

Zp∞t na obsah


Verze Windows

ZjiÜt∞nφ verze Windows je to nejjednoduÜÜφ, co zde dnes naleznete.

MsgBox(Environment.OSVersion.ToString)

Zp∞t na obsah