Korn
|
SAO PAULO
SP - BRASIL
|
|
Postada em 15/12/2004 13:23 hs
tenhoi um codigo tamen assim veio esta dando ero no DAtaCOntrol1, na primeira linha " object doesn't support this property or method" Dim CodPesq As Long
Dim strSQLRpx As String
'Dim rptRelApartamentos As Index
CodPesq = 10
strSQLRpx = "Select * From Tbl_Apartamentos WHERE Codigo=" & CodPesq & "" ' Código Numérico
'strSQLRpx = "Select * From Tbl_Apartamentos WHERE Codigo='" & CodPesq & "'" ' Código String
With ActiveReport1
.DataControl1.DatabaseName = "C:WINDOWSDesktopCópia de ImobiliariaBdimobiliaria.mdb"
.DataControl1.RecordSource = strSQLRpx
.Caption = "RELATORIO"
.Show
End With
Jesus Cristo é O Senhor!!!
|
|
|
|
|
|
MARCONE
|
BRASÍLIA
DF - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 15/12/2004 14:19 hs
Esse código está inconsistente. Use, como exemplo, o código do botão Imprimir (frmApartamentos) que lhe enviei. Basta mudar o código sql e o nome o relatório para impressão.
Marcone
|
|
|
|
Korn
|
SAO PAULO
SP - BRASIL
|
|
Postada em 15/12/2004 14:29 hs
Esse ai seria so mais um codigo q eu tenho akele q vc me mando é bom vei, so q esta com akeles problemas q mandei pro teu email
Jesus Cristo é O Senhor!!!
|
|
|
|
