|
I think its something along the lines of:
Dim crtableLogoninfo As New TableLogOnInfo
Dim crConnectionInfo As New ConnectionInfo
Dim CrTables As Tables
Dim CrTable As Table
' Set the connectioninfo
With crConnectionInfo
.ServerName = "(local)"
.DatabaseName = "pubs"
.UserID = "sa"
.Password = "asdasd"
End With
CrTables = crReportDocument.Database.Tables
' Apply the connectioninfo to each table in the report
For Each CrTable In CrTables
crtableLogoninfo = CrTable.LogOnInfo
crtableLogoninfo.ConnectionInfo = crConnectionInfo
CrTable.ApplyLogOnInfo(crtableLogoninfo)
Next
I'm not sure if this is exact, but its pretty close to. I had the same problem with different customers with different servers/databases/login details. Took me awhile to solve.
|
|
|
|
|
Clear and basic difference between .dll and .exe file?
When the .dll and exe files are created?
Anybody know the answer send me.
aruljothi
|
|
|
|
|
In most fundamental terms, a DLL does not have it's own execution context. You cannot "run" a DLL. In order to run code in a DLL it must be loaded by an exe. DLLs are often created to allow reuse of general code, although this is not a requirement. A developer may create DLLs that are only intended for use by a single application, because a DLL allows more modular organization of code, and a DLL may be upgraded without having to redistribute a new version of an application.
DLLs are not typically form oriented. An occasional DLL may display a dialog, but most DLLs contain primarily classes with few or no forms.
For example, the NET framework is primarily composed of DLLs.
In general, a well designed application that is any larger than "small" in terms of size and complexity will consist of an EXE that provides the forms and user interface, but all business logic and real guts of the application will be organized into a logical class structure provided by DLLs.
|
|
|
|
|
The following error message is being displayed when i first started my asp.net application. So kinly help me with the solution.
"Error while trying to run project.Unable to start debugging webserver.The server doesnot support debugging of asp.net or ATL server application.Run setup to install the visual studio.net server components. If set up has been run verify that the valid url has been specified.
U may also want to refer the asp.net and ATL server debugging topic in the online documentation. Would u like to disable future attempts to debug asp.net projects for this projects."
aruljothi
|
|
|
|
|
The best place to look for solutions to this is Microsoft.
A simple search for "The server does not support debugging of ASP.NET" reveals PRB: Cannot Debug ASP.NET Web Application[^]. And if that doesn't work, you can try the results[^] returned by the search.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello, i am beginner in vb.net.
I know well how to bind the data in a datagrid.Now i want to add a new record in to a table through datagrid thats why in my datagrid last row is always blank.
How it is possible?
How to enter new record in a datagrid?
Any one know the solution help me.
aruljothi
|
|
|
|
|
what you need to do is add rows dynamically to the table source of the datagrid
for eg:- you have a material table as a datasource to your datagrid.Now you dynamically add rows to this table.The rows added are material detail selected by user.
the user selects specific material from the drop down combobox
here is a sample code snippet
Private Sub btnadd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnadd.Click
Dim drow As DataRow = material.NewRow
Dim drv As DataRowView = CType(cmbmatnam.SelectedItem, DataRowView)
Try
drow("column1") = drv("mat_id")
drow("Column2") = drv("mat_name")
drow("Column3") = drv("Rate")
drow("Column4") = drv("Quantity")
drow("Column6") = "Enter Quantity"
material.Rows.Add(drow)
material.AcceptChanges()
Catch ex1 As System.NullReferenceException
MessageBox.Show("There are No Materials In this Category")
Catch ex2 As System.Data.ConstraintException
MessageBox.Show("Material Is already Selected")
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
End Sub
I hope this helps
Mandar Patankar
Microsoft Certified professional
|
|
|
|
|
Hi there i need to display my filename with current system time can any one suggest how to do it this is y code snippet
Dim strFile As DateTime = DateTime.Now
strFileName = str & strFile.ToString("MMM, yy,")
strMonth = strFile.ToString("MMM")
strYear = strFile.ToString("yyyy")
regard
ybasha
|
|
|
|
|
Hello.....
Concat the following string to ur current filename
strTime = Now.ToShortTimeString() <----
_mubashir
|
|
|
|
|
Hi there i need to display my filename with current system time can any one suggest how to do it this is y code snippet
Dim strFile As DateTime = DateTime.Now
strFileName = str & strFile.ToString("MMM, yy,{o:T}")
' strFileName = str & strFile.ToString("{o:T}")
strMonth = strFile.ToString("MMM")
strYear = strFile.ToString("yyyy")
regard
ybasha
|
|
|
|
|
I want to do wake-on-lan in vb.net. Could anyone help?
Thank you!!
|
|
|
|
|
dap_qk wrote:
I want to do wake-on-lan
You'll have to be alot more specific than this. What do you want to do with this?
Keep in mind, that since the CPU is sleeping, you're code isn't running!
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I wanting to wake up a remote computer. And using vb.net to do that.
|
|
|
|
|
|
Thank you for your articles
|
|
|
|
|
I am trying to build a relation using 2 fields in each table. I am getting the following error:
BC30518: Overload resolution failed because no accessible 'Add' can be called with these arguments
When trying it with the following syntax:
objDs.Relations.Add("RelationName", objDs.Tables("Table1").Columns("Field1","Field2"), objDs.Tables("Table2").Columns("Field1","Field2"))
I have not been able to find any examples using 2 key fields in each table. Please let me know if this is the correct syntax and if not give me an example.
Thanks for any help!
Steve
|
|
|
|
|
What I am trying to do is this. I create a dataset which is then populated from a database for the purpose of displaying in a datagrid. But what I wish to do is, before it goes to the datagrid for displaying, I want to insert a new column into the dataset and fill it with calculated data.
I have scoured the net looking for a solution but to no avail. So basically I want to add a column to a dataset that has already been filled and then add data to that column as its calculated.
|
|
|
|
|
Off the top of my head (I did something similar recently), remember that columns are a collection within the dataset.
So, something along the lines of:
dataset.tables("MyTable").Columns.add (col)
You'd have to define Col as a column first with details such as name, type, size etc - check out the vs help for that, quite easy.
.....
infact, just found the code for you
....
Dim col as New DataColumn
col.ColumnName = "CustomerName"
col.DataType = GetType(string)
dataset.Tables(0).Columns.Add(col)
Hope this helps
|
|
|
|
|
Its half working but I'm getting a
System.NullReferenceException: Object reference not set to an instance of an object.
On the "fix.Tables(0).Columns.Add(col)" Part of the code.
|
|
|
|
|
Got it working, Cheers. I was adding my column before I had populated my DataSet. Such a schoolboy error.
|
|
|
|
|
Hi all,
I am enhancing an existing VB 6.0 application to support Arabic Language. I converted almost all the forms and controls in the Right-to-left reading order including the MsgBox's. The text and the captions of all the controls are also displaying in Arabic. But the problem is that the OK, Cancel, Retry buttons, etc. in the MsgBox still displays in english language only. Is there any method to display the MsgBox button captions also in Arabic? Please help me in this regard.
Thanks in Advance,
Padmakumar.
|
|
|
|
|
No, you can't programatically change them. Those buttons use the Language settings in the Regional Options control panel.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Ok still one more option exists!
You can simply set the Msgbox's buttons' texts, in run-time using SetWindowText API.
Just you need to create an Msgbox, and enumerate it's child windows, and change the text of the Button ones.
By the way you should remember that msgbox runs modally, if you don't know how to handle this, I could explain more.
|
|
|
|
|
I don't know how to handle this. Can you explain me? I will of much help to me.
Thanking You
Padmakumar
|
|
|
|
|
I have an app i am building where users are able to upload .csv files to be validated. there is a small problem, the company that is going to be using it has decreed that the .csv files do not have to have a header row.
the code i have so far simply fills a dataset
Dim com As New OleDbDataAdapter(xl, con)<br />
Dim ds As New DataSet<br />
<br />
com.Fill(ds)
this works just fine and it handles all the data appropriately when the original file has the first row set up as headers
however, if they dont, it grabs the first row of data as the headers, then runs the rest normally. As you can guess, this messes up the output quite a bit.
what i am looking to do, is this:
i already have code in place that checks to see if there is a header row:
if ds.Tables(0).Columns(0).ColumnName <> "recordid" Then
What i want to know is, how do i insert a Header row into the dataset, after it has been created?
______________________
Mr Griffin, eleventy billion is not a number...
-- modified at 15:03 Tuesday 30th August, 2005
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
