I need to find out how to display, edit and save SQL information using Visual Basic. I can create an SQL database and spreadsheet, but do not know how to incroporate it into my project, and make certain pieces of the information (certain cells) appear in the labels or textboxes that I designate in my VB Project.
Thanks.
Hi,
View 1 Replies View RelatedHello,
I have the following problem.
i have a report where you need to fill in a few parameters
start date, end date and subject selection.
the subject selection is a multivalue paramter (select all, param1, param2, param3)
the multivalue parameter is based on another dataset with paramid as value field and paramdescription as value label.
in my report i want to display something like this :
from startdate to enddate
summary for campaign(s) : selected parameters.
in the selected parameters is can display a =join(Parameter!campaig.value) but this only returns the 32bit guid.
instead i would like it to display the parameterdescription label.
anybody has some ideas ?
greetings
vince
I'm trying to create a reprot with 30+ datasets/querys. My report is made up of tables (one for each dataset), and it starts a new page whenever a new dataset is being displayed. I would like to have a header on every page, and have it display a custom name for the dataset on that page. How do I approach this?
Thanks for any answers or leads.
Is it possible to align a text box to display text with rotation? For example can I display it rotated 90 degrees left so that it reads from the bottom towards the top of the page? All I can find is left/right alignment and top/middle/bottom alignment. I want to rotate the text.
Thanks.
In SQL 2000 you went to Control Panel and SQL Licensing to view licensing mode and qty. I have searched everywhere for the equivelant in 2005 including books online, knowledge base but can't find anything.
Anybody know where it is hidden as I need to check this server is set up for per processor and check how many processors?
Thanks
Richard
Hello I was very happy to have found the thread http://forums.microsoft.com/MSDN/ShowPost.aspx?PostID=491642&SiteID=1 that explained how to get the text to display Bottom-to-Top/Left-to-Right.
The solution was to setup a function that creates a bitmap the text to be displayed.
This works well and correctly displays the text image in HTML and PDF. (Excel, XML and CVS won't export backgroud images).
To extend the solution to wrap text it requires a few additional lines...
Code Snippet
Function LoadImage3(ByVal stText As String)
stText = stText.PadRight(10)
stText = stText.PadLeft(10)
Dim iMaxLength as Integer = 180
Dim iMaxWidth as Integer = 180
Dim f As Drawing.Font = New Drawing.Font("Arial",7, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point)
Dim bmpImage As New Drawing.Bitmap(1, 1)
Dim MyGraphics As Drawing.Graphics = Drawing.Graphics.FromImage(bmpImage)
Dim imageSize As Drawing.SizeF = MyGraphics.MeasureString(stText, f)
Dim i As New System.Drawing.Bitmap(iMaxWidth, iMaxLength)
Dim g As Drawing.Graphics = Drawing.Graphics.FromImage(i)
Dim rectF1 As New Drawing.Rectangle(-(iMaxWidth/2),-(iMaxLength/2),iMaxWidth,iMaxLength )
g.FillRectangle(Drawing.Brushes.White, 0, 0, i.Width, i.Height)
g.TranslateTransform((iMaxWidth/2), (iMaxLength/2) )
g.RotateTransform(270.0F) 'flip the image 270 degrees
g.DrawString(stText, f,Drawing.Brushes.Black, rectF1)
g.DrawRectangle(New Drawing.Pen(Drawing.Color.White, 1), rectF1)
g.Flush()
Dim stream As IO.MemoryStream = New IO.MemoryStream
Dim bitmapBytes As Byte()
i.Save(stream, System.Drawing.Imaging.ImageFormat.Jpeg) 'Create bitmap
bitmapBytes = stream.ToArray
stream.Close()
i.Dispose()
Return bitmapBytes
End Function
Items highlighted in yellow reflect changes made to orignal solution.
Hope this helps!!
I want to add up the values in a couple of text boxes in another textbox. How do I refer to the textboxes?
fields!textbox1.value doesn't work..what does?
I want to be able to see when records have been added to a table. The issue is we have a DTS job scheduled to run every night. The developer who wrote it password protected it and doesn't work here anymore. I want to add a step to this series of DTS jobs and want to run it just prior to his job. Is there a way to see when the records are being added or when this job is being run? Thanks again, you guys are the best.
ddave
Hi!
I dont know if i will explain this correctly, but my problem is with reporting service.
I'm supposed to Sum value in one textbox and than that sum use it in sum in other textbox.
Something like this:
Sum(Fields!Abc.Value/(Fields!dfg.Value+Sum(Fields!abc.Value)),"matrix1_RowGroup1")*100
I get error msg 'The Value expression for the textbox 'textbox49' contains an aggregate function (or RunningValue or RowNumber functions) in the argument to another aggregate function (or RunningValue). Aggregate functions cannot be nested inside other aggregate functions.'
Something like this wont work either Sum(Fields!abc.Value/ReportItems("textbox56").Value)*100
Error The Value expression for the textbox 'textbox55' uses an aggregate function on a report item. Aggregate functions can be used only on report items contained in page headers and footers.
So, pls help if you know how to reference textbox in other in body of report.
Thx.
I would like to display a portion of report where there is data or no data
There is data subreport display
Product Name Latex Gloves
Product ID
xxxx5678
There NO data in the subReport
Product Name
Product ID
I have several textbox on my report and I would like to remove line if blank.
texbox1
textbox2 <--- use Expression in order to display it.
textbox3
------------------------------------------------------------------------------
Current Display :
sergio myers
<-------- insert a blank line
donna summer
_____________________________________________
The Desire Result that I would like to have :
sergio myers
donna summer
_____________________________________________
I would like to remove the middle line if blank so it can be display like this :
sergio myers
donna summer
Does anybody knows how to accomplish this in Reporting Services.
Foxpro uses "Remove line if blank" and 'Print only when expression is true'
Thanks,
Sergio
Hey
I got a SQL DB with three tables, where two of the collums of the main table gets its data from two other tables, ok? Now, on one page, called "search" the user should be able to search in the DB, and on another page the user should be able to register some keywords, my question is how can the user register several keywords in the same textbox, using perhaps a ; as a separator between the words? I hope you understand what I mean..
Thx!
Hello
How do u update the datafield of a row using buttonClick in vb? I have a details view whereby it will display the username and timeleft once log in. currently the datafield, timeleft on one user in the database is null. I'm using sqldatasource.
Once log in, it will direct to this page where the user enters a code on the textbox and click the enter button. This will cause an update on the user's timeleft. But the code must not be entered to the database.
For eg. If code = 1111 then 'update timeleft = 60 The timeleft is in minutes. 60 will be stored as double in the user's row in the database. How do i do this?
Please help asap. Thanks! :)
I use txtbox.Text = cmd.ExecuteReader() but it doesn't work. How can I fix it ?
View 4 Replies View RelatedHelloI have a problem when I want to update my textbox, I have a textbox called Textbox1, when I Insert data from it to database it is working well, even when I Update it WITHOUT SELECT field from database it is working well again,but when I Select [pagename] from database then want to Update it it is not working, nothing happend and in debuging the textbox doesnt have any value. what shoud i do? the value become null? Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Label1.Text = Request("Id").ToString() Dim conname As String = ConfigurationManager.ConnectionStrings("IPbrandConnectionString").ConnectionString() Dim con As New SqlConnection(conname) Dim sql As String = "SELECT [Id], [pagename] FROM [content] WHERE ([Id] = @Id)" Dim cmd As New SqlCommand(sql, con) cmd.Parameters.Add(New SqlParameter("@Id", SqlDbType.Int, 32)) cmd.Parameters("@Id").Value = Label1.Text.ToString() con.Open() Dim reader As SqlDataReader = cmd.ExecuteReader() Do While reader.Read() TextBox1.Text = reader("pagename") Loop reader.Close() con.Close() End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim conname1 As String = ConfigurationManager.ConnectionStrings("IPbrandConnectionString").ConnectionString() Dim con1 As New SqlConnection(conname1) Dim sql1 As String = "UPDATE [content] SET [pagename] = @pagename WHERE [Id] = @Id " Dim cmd1 As New SqlCommand(sql1, con1) cmd1.Parameters.Add(New SqlParameter("@Id", SqlDbType.Int, 32)) cmd1.Parameters("@Id").Value = Label1.Text.ToString() cmd1.Parameters.Add(New SqlParameter("@pagename", SqlDbType.VarChar, 50)) cmd1.Parameters("@pagename").Value = TextBox1.Text.ToString() cmd1.UpdatedRowSource = UpdateRowSource.OutputParameters Try con1.Open() cmd1.ExecuteNonQuery() Catch err As SqlException Throw New ApplicationException("Data error.") Finally con1.Close() End Try Server.Transfer("main.aspx")
View 2 Replies View RelatedI am working with a Detailsview. I am displaying information from a number of different tables, and so when I configure the datasource I have to specify a custom sql statement. I can get it to display the right columns, but I cannot seem to be able to use a where statement.
I am wanting to display the info in the Detailsview based on what is entered into a textbox, but I get an error when I try to add in the where statement. Can someone tell me what I am missing here?
Thanks
Is it possible to do this as i want to select the top based on the value i enter in the textbox. usually we using this
SELECT TOP 10 * FROM Customers
But i want the value is get from my textbox.
Hey guys, I am trying to create a report which features a lot of textboxes side by side, but I have the problem that even though they are the same size when the textboxes are placed side by side or above or below another textbox and then the preview tab is selected they often look different for example they may not be aligned correctly or the borders look thicker in different textboxes.
Is there a solution for this issue?
Many thanks.
Hi Folks,
I'm trying to assign multiple values to a textbox and I'm receiving an error. The error says, "The value expression for the textbox AcctName contains an error." The first value is account number and the second value is account name. An example follows:
1234 - SPC Travel Agency
My expression for the textbox contains the following:
=Fields!AcctNum.Value + ' - ' + Fields!AcctName.Value
Please help.
Hello,
How do set the textbox in a tablereport, so that it regonize a CR (chr(13)) and LF(chr(10)) in the data and jumps to the next line?
John
Hi team!!
I have a report with parameters but I show the parameters in a combo box (drop down list) with the valid values only, so, I need a single text box that autocomplete what the user types, could you help me with this please?
Regards,
Marcos
First time poster, I am using MS Access and I have used the following code to get some data. It is as follows:
Code Snippet
Private Sub FillGUI()
On Error Resume Next
Dim myRS2 As New ADODB.Recordset
myRS2.ActiveConnection = CurrentProject.Connection
myRS2.CursorType = adOpenDynamic
myRS2.LockType = adLockOptimisticd
myRS2.Open "SELECT E.SSN, E.LNAME, SUM(W.HOURS) FROM EMPLOYEE E, WORKS_ON W WHERE (E.SSN = W.ESSN)GROUP BY E.SSN, E.LNAME HAVING(SUM(HOURS)) < 40"
MsgBox (myRS2.GetString)
myRS2.MoveFirst
End Sub
and I have the following output:
http://www.angelfire.com/oh5/ohiostate120/untitled1.JPG
This is what I want. However I need this to be in a text box so I have the following code:
Code Snippet
Private Sub FillGUI()
On Error Resume Next
Dim myRS2 As New ADODB.Recordset
myRS2.ActiveConnection = CurrentProject.Connection
myRS2.CursorType = adOpenDynamic
myRS2.LockType = adLockOptimisticd
myRS2.Open "SELECT E.SSN, E.LNAME, SUM(W.HOURS) FROM EMPLOYEE E, WORKS_ON W WHERE (E.SSN = W.ESSN)GROUP BY E.SSN, E.LNAME HAVING(SUM(HOURS)) < 40"
Me.txtEmployee.SetFocus
Me.txtEmployee.Text = myRS2.GetString
myRS2.MoveFirst
End Sub
And i get this:
http://www.angelfire.com/oh5/ohiostate120/untitled2.JPG
How can I get the text box format to look like the msgbox format? Thanks.........
Hi,
A report that looks perfect in the report designer has a minor problem when rendered. The textboxs widen if data is in them. If they are empty they are the proper length.
Is this a property that needs to be set?
Thanks,
Do anyone know how I can replace or Substitute the current value of a form textbox with another value.For example, the string "YES" appears on the textbox but hit the SAVE button I would like "TRUE" to be entered in the SQL Server database table. Thanks.
View 6 Replies View RelatedFirst time poster, I am using MS Access and I have used the following code to get some data. It is as follows:
Code Snippet
Private Sub FillGUI()
On Error Resume Next
Dim myRS2 As New ADODB.Recordset
myRS2.ActiveConnection = CurrentProject.Connection
myRS2.CursorType = adOpenDynamic
myRS2.LockType = adLockOptimisticd
myRS2.Open "SELECT E.SSN, E.LNAME, SUM(W.HOURS) FROM EMPLOYEE E, WORKS_ON W WHERE (E.SSN = W.ESSN)GROUP BY E.SSN, E.LNAME HAVING(SUM(HOURS)) < 40"
MsgBox (myRS2.GetString)
myRS2.MoveFirst
End Sub
and I have the following output:
http://www.angelfire.com/oh5/ohiostate120/untitled1.JPG
This is what I want. However I need this to be in a text box so I have the following code:
Code Snippet
Private Sub FillGUI()
On Error Resume Next
Dim myRS2 As New ADODB.Recordset
myRS2.ActiveConnection = CurrentProject.Connection
myRS2.CursorType = adOpenDynamic
myRS2.LockType = adLockOptimisticd
myRS2.Open "SELECT E.SSN, E.LNAME, SUM(W.HOURS) FROM EMPLOYEE E, WORKS_ON W WHERE (E.SSN = W.ESSN)GROUP BY E.SSN, E.LNAME HAVING(SUM(HOURS)) < 40"
Me.txtEmployee.SetFocus
Me.txtEmployee.Text = myRS2.GetString
myRS2.MoveFirst
End Sub
And i get this:
http://www.angelfire.com/oh5/ohiostate120/untitled2.JPG
How can I get the text box format to look like the msgbox format? Thanks
I want to display 1 million characters in a SQL Server Report's text box, but it is only showing 32000 charcters....how can I display all 1 million character without any truncation.
View 5 Replies View RelatedHopefully this is a simple question, but can a textbox filter based on a dataset row value?
View 1 Replies View Related
I'm having an issue where the Textbox in a RS Report (1 page) is not showing up. I have 4 reports all of which are basically the same except 1 or 2 different wordings however on all of them they are not showing up using http://localhost/reports . If i'm in Visual Studio and click on preview report I see everything just fine. But when I view online (pdf, html, excel) it does not show. The footer however shows up fine on all of them. Does anyone have a fix?
PS: The wierd thing is that on Production they are working but on the Test server they are not and nothing has changed. Both servers are running the same version of SQL 2005. I need to re-deploy the reports coming soon with changes but I am afraid that Production will stop working then.
-Chris
My report has a group "order_no" and after each 1 there is a page break.... on each page I want a textbox which refers to the product column in the table...
How do I get the textbox to refer to the column on that page?
(I no to refer to the column in the table is:
=ReportItems("product").Value
But now that I have moved the textbox to the page header, it returns no value!!!
Thanks in advance
We want to use our styles say "mystyle" on a report. I am surprised that we do not have cssstylename as a property for a textbox?
Ideally, i should be able to add that style in the styles.css file and reference the style name on the textbox. All that would be needed is that it would add an attribute to the rendered html. I wonder if it already exists and i am missing some information?
what is the syntax to write:
a Textbox.Value = data from a cell in the table????
Hi,
I have 3 textboxes going down.
box1
box2
box3
Is there a way to hide the box2 (with some condition) and shift up the box3 when displaying the result?
like this:
box1
box3
I know how to use the hidden property but it leave a blank space between box1 and box3.
FYI. I'm trying to do this in the PAGE HEADER section.
thank you for your help.
jib