|
Hi,
This is ranjan. If u r using data environment then it is quite easy to do the same without using any parameter concept. change the source properties of the command object of the appropriate connection and call the report. Automatically it will be filtered with the report.
Suppose ur data report is datareport1
dataenvironment1, connection1 and command1 these has been set then
dataenvironment1.rscommand1.source="select * from tablename where datediff(fromdate, datefield)>0 and datediff(todate, datefield)<0"
datareport1.show
try out it
|
|
|
|
|
Please send me an answer the parameter issue when you get it. My address is aongoro2001@yahoo.com
|
|
|
|
|
I have made a program with several data reports. It works fine in my computer. But when installed in other computers, i can't view the reports, receiving the nessage
"Run Time error 713- Aplication defined or object defined error".
Can anybody help?
Thank you
|
|
|
|
|
I had designed the Reports using DataReport and Dataenvironment. It works in some systems. But shows "Invalid DataSource" Error in some other systems.
Please help me to find a solution?
|
|
|
|
|
If I try to add multiple child commands to a prent commnand,the fields in the second child command cannot be seen on the report.
|
|
|
|
|
Aastha
If I try to add multiple child commands to a prent commnand,the fields in the second child command cannot be seen on the report.
|
|
|
|
|
I'm writing a phonebook progamme, I don't know how to set the paper size in data report, so that I can print a envelope using data report. I've try to set the reportwidth and height, but data report also show the A4 preview. Any one can help me?
Many thanks!
|
|
|
|
|
hello:
I have done my software in vb and as a database i have used access, the problem is that after i have created my report in vb, i wanted the report to print some spacific data for example
to print all data where month = may
pleas help ifand i dont how to do it you can
thanks amer
|
|
|
|
|
Then you need to code inside the datareport section ...
in with datareport_initialize
USe SQL statement to select according to your criteria ...
HArry the VB6
|
|
|
|
|
create a temparary file containig one field
then you establish relation with your table whitch you want to tack as selection field
|
|
|
|
|
how in query that we specify in command object in data environment the table name can be changed?do we have to set a parameter for that ?if yes how can we set a parameter?
|
|
|
|
|
how can i increase the size of data reports in vb to add more fields or columns say 25 or more.means to increse report width
sapna katyal
|
|
|
|
|
hi i want to learn about reporting in vb using vb reports
jv
|
|
|
|
|
How to create a data report using visual basic 6 and access database
|
|
|
|
|
I made a Data Report form.
I loaded RptImage control on DataReport form and loaded picture on it.
If export as html format, image doesn't be shown.
How I make image show?
Hello everyone
|
|
|
|
|
I have a report designed in seagate Crystal Reaports.
I do not want the user to go and click the export button to export the report in the excel format.
I want my application to automatically export the report in Microsoft Excel and the name and path of the file will be provided by me.
|
|
|
|
|
how to assign values to text boxes on reports at run time
sapna katyal
|
|
|
|
|
hi,
i am doing a project on vb/asp.i want to call a data report from a component(middle tier) in a word/html/doc format.help me in executing this project
rithika
|
|
|
|
|
hi,
i am doing a project on vb/asp.i want to call a data report from a component(middle tier) in a word/html/doc format.help me in executing this project
rithika
|
|
|
|
|
:(After I update a record in the form, then when I show the report, its not updated.
|
|
|
|
|
i think thats maybe because your dataenvironment command is not updated.
try this:
before showing the report,
dataenvironment.commands(command_name).commandtext = your_sql_statement
if dataenvironment.rscommandname.state = adstateopen then
dataenvironment.rscommandname.close
end if
dataenvironment.commandname
datareport.show
example:
dataenvironment = de
commandname = command1
sql_statement = "SELECT NAME,AGE FROM REC_TABLE WHERE AGE > 21"
de.commands("COMMAND1").commandtext = "SELECT NAME,AGE FROM REC_TABLE WHERE AGE > 21"
if de.rscommand1.state = adstateopen then
de.rscommand1.close
end if
de.command1
|
|
|
|
|
hello friends
please help me, i am doing a large project and it is in final stage, please tell me how we call data reports in asp
thanks and looking for response
manoj kaushik
|
|
|
|
|
I want in my detail section of reports 2 records simultaneously by the side of each other. The 3rd record should go below the 1st record . The 4th below the second ?
Is it possible ? If so How ?
|
|
|
|
|
Hi there!
The problem u hav asked have a tricky solution. Create a dummy table by nay name in which u have the fields equal to the double of the fields in the original report and then by using the following loop u can solve ur problem
suppose table is table1 and it have two fields name and age
then u create a table of name table2 having four fields name1, age1,name2 , age2
dim con as new ADODB.Connection
dim rs1 as new ADODB.Recordset
dim rs2 as new ADODB.Recordset
dim name1 as string
dim age1 as long
dim name2 as string
dim age2 as long
con.open "yourdsn","username","passward"
con.execute "delete from table2"
rs1 = "select * from table1",con,adopendynamic,adlockbatchoptimistic
rs2 = "select * from table2",con,adopendynamic,adlockbatchoptimistic
while not rs.eof
name1 = rs.fields("name")
age1 = rs.fields("age")
rs.movenext
if (not rs.eof) then
name2 = rs.fields("name")
age2 = rs.fields("age")
rs.movenext
else
name2 = ""
age2 = 0
endif
rs2.AddNew
rs2.fields("name1") = name1
rs2.fields("age1") = age1
rs2.fields("name2") = name2
rs2.fields("age2") = age2
wend
now set the datareport as per the table2
|
|
|
|
|
There is a problem in above code
the refined code is here:
dim con as new ADODB.Connection
dim rs1 as new ADODB.Recordset
dim rs2 as new ADODB.Recordset
dim name1 as string
dim age1 as long
dim name2 as string
dim age2 as long
con.open "yourdsn","username","passward"
con.execute "delete from table2"
rs1 = "select * from table1",con,adopendynamic,adlockbatchoptimistic
rs2 = "select * from table2",con,adopendynamic,adlockbatchoptimistic
while not rs1.eof
name1 = rs1.fields("name")
age1 = rs1.fields("age")
rs1.movenext
if (not rs1.eof) then
name2 = rs1.fields("name")
age2 = rs1.fields("age")
rs1.movenext
else
name2 = ""
age2 = 0
endif
rs2.AddNew
rs2.fields("name1") = name1
rs2.fields("age1") = age1
rs2.fields("name2") = name2
rs2.fields("age2") = age2
wend
mail me at callparas@rediffmail.com
Nothing
|
|
|
|