Dim conn as new sqlconnection
Conn = sqlconnection(“integrated security = true; data soure=NOMEMAQUINA;initial catalog= pubs”)
Conn.open()
Dim reader as sqldatareader
Dim cmd as sqlcommand
cmd = new sqlcommand (“select authors from pubs”,conn)
reader = cmd.executereader
while reader.read
combobox1.items.add(reader.itens(“authors))
end while
conn.close()
![]() |
CodigoFonte.net » CodigoFonte.eti.br » Compre De Tudo » Meu Mural » PelamorDeDeus » Todos os Direitos Reservados © 2002/2008 |
Procurando Notebooks, Câmeras Digitais, iPhones?