Vou responder o q consigo no momento pois não tenho vb pra fazer verificações....
vamos lá:
1) Debugando vc já viu isso? Chega a passar pelo "END"?
2) Não dá para zebrar o DataGrid. Use o MSHFlexgrid para isso... tb pode ser conectado ao ADO. Q controle vc está falando? Não tem a propriedade background para vc mudar o fundo?
3) Não lembro se tem a propriedade bold para o item de menu... veja se tem algo como seumenuitem.font, seumenuitem.font.bold ... sei q dá pra fazer com check... fiz isso pra uma situação semelhante à sua para chegar alguns itens do menu. No meu caso a lógica foi meio difícil mas dá pra se fazer.
4) Só testando qdo chegar em casa... se quiser dê uma olhada no controle DtPicker. Creio q está no componente q vc escolhe lá em "project|Components..." chamado de Microsoft Windows Common Controls 2. É bastante interessante... só não sei se te atende
5) e 6) Não costumo mexer com o Package and Deployment do vb... mas não tem um lugar q tem as referências do seu projeto? Veja se não dá pra retirar o DAO. Não sei se vc fez mas ao incluir o controle DATA q é DAO ele referencia a biblioteca. Mesmo se vc tirar o controle do seu projeto ele continua lá... bom ae não sei o q vc fez... :)
Em relação ao arquivo... isso eu realmente não sei mas talvez o arquivo já esteja em uso e ele não deixa q a instalação prossiga... como disse antes não mexo muito com o pacote de instalação do VB mas veja se tem como ver o tipo de tratamento na instalação do arquivo. Infelizmente não posso ajudar mais q isso no momento .
7) Primeiro vc referencia a biblioteca do ADO (vc já deve ter a referência por ter incluído o controle ADO):
Vá no menu "Project|References..." e marque a opção "Microsoft ActiveX Data Objetct 2.X Library" onde 2.X é a versão.
Depois inicialize e abra o banco de dados somente uma vez e, portanto, declare como pública ou no primeiro form do seu sistema ou preferencialmente num módulo:
Global cnn as ADODB.Connection
Sub Main()
On Error GoTo Erro:
Set Cnn = New ADODB.Connection
Cnn.CursorLocation = adUseClient
Cnn.Open "Provider = Microsoft.Jet.OLEDB.4.0;Data Source= C:MEUMDB.mdb"
FormPrincipal.Show
Erro:
If err.Number <> 0 then MsgBox Err.description & vbcrlf & Err.number,Critical
End Sub
No caso coloquei a inicialização da variável e abertura da conexão num módulo na Sub Main. Vc só vai no menu das propriedades do seu projeto:"Project|MEUPROJETO Properties ..." e na inicialização do seu projeto vc coloca a "Sub Main()".
Deste modo vc está conectado ao banco de dados. Operações de manipulação de dados:
Consultas:
1) Dim Rs as ADODB.Recordset
Set Rs = New ADODB.Recordset
Rs.Open "SELECT * FROM TABELA",Cnn
2) Set Rs = Cnn.Execute ("SELECT * FROM TABELA")
Inserção de dados
'Depois de iniciar e abrir o recordset
Rs.AddNew
Rs("Campo") = valor
Rs.Update
ou por SQL (recomendo)
Cnn.Execute "INSERT INTO tabela (nome,idade) VALUES ('JOAO',18)"
Alteração de dados
'Localize o registro a alterar (se eu não estou enganado)
Rs.Find "id=1"
Rs("Campo") = valor
OU
'Mais rápido
RS.INDEX = "PrimaryKey" 'campo indexado
RS.Seek "id = 1"
ou por SQL (Recomendo)
Cnn.Execute "ALTER TABLE Tabela SET nome = 'JOSE' WHERE id = 1"
Deleção de dados
'Localize o registro como citado acima depois delete o dado
Rs.Delete
Rs.Update
em SQL (recomendo)
Cnn.Execute "DELETE FROM Tabela WHERE id = 1"
Bom, tentei ajudar ae... tomara q sirva pra vc.
Qq dúvida é só postar
at+
*****************************
Vamos lá de novo:
1) Minha sugestão é salvar num arquivo ini essas configurações e ao carregar o grid só ler as informações do arquivo. Veja a dica: http://www.vbweb.com.br/dicas_visual.asp?Codigo=2501&Classificacao= para fazer isso
2) O DataReport é muito limitado. Utilize o Crystal Reports ou o Active Reports. Não uso o Active mas dizem q é muito bom, até melhor q o CR. Mas para usar o Crystal veja este artigo: http://www.macoratti.net/crystal.htm .
Creio q é do Crystal 4.6 ainda mas a base é a mesma para todos os crystal até a versão 9.1 q é até onde conheço. Qq dúvida é só postar no fórum q os colegas te ajudarão à esclarecer suas dúvidas se possível.
Só recomendo, se vc usar o crystal, não usar o relacionamento e evitar ao máximo usar fórmulas no crystal. Sempre q possível crie um tabela em q os dados do relatório irão e vincule ao crystal reports. Só preencha os dados da tabela q o crystal pegará os dados sem maiores problemas...
3) O q não funciona?? Sei q o código de compactação (em ADO) do site funciona pq já usei mas não usei o código de para zipá-lo. Se puder passe o link pra gente testar e veja se contorna a situação. Tb procure msgs no fórum ou na seção dicas se tem código para compactação. Sei q o colega KORN tem um código q funciona...
4) A função time retorna a data no formato HH:MM:SS. Se vc quiser fazer isso com "NOW" use: MsgBox Format(Now, "HH:MM:SS")
Se quiser data por extenso segue dica:http://www.vbweb.com.br/dicas_visual.asp?Codigo=2128&Classificacao=
Qq dúvida postae...
at+
