|
In all cases, does the error only show up on the ContactDetails table?? All the others Fill properly no matter what you do?
|
|
|
|
|
I would expect that the contactdetailstableadapter is firing events that are causing other code to run and cause the problem.
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
I've a component (vb6 dll) with one method. I've created one virtual
directory in my xp machine and registered the dll in it. I've
generated wsdl file using ms soap kit 3 in the same folder. Now when i
call the service from another vb program in the same machine / some
other machine i got the below error.
WSDLOperation: Instantiating the dispatch object for method
name> failed HRESULT=0x80040154: Class not registered.
When i search on the web, it may the dll registration problem. But i'm
sure i've registered. I can add the dll as a reference in another vb
program. I can create an object in another asp program.
I've checked both are working fine. Now the problem is through web
service is shows the error.
I've tried in so many ways. After registered i've restarted the iis
and restarted the machine .....
But I've not get any solution.
If any idea pls help me.
Thanks.
Rishihar S
WinCrs
|
|
|
|
|
You wrote a COM-based .DLL and registered it on the system. The problem is probably with the web service description. It would appear that the class is registered, but the WSDL is using the wrong name to create an instance of the class.
I haven't used VB6 in over 6 years now, and never with a Web Service, so my experience is very limited.
|
|
|
|
|
I have stored the xml string in a StringBuilder variable sb.I want to write the string in sb to a file XMLsetting.xml.
Please help
thanks in advance
|
|
|
|
|
Ok. You already have the XLM is a StringBuilder, so call it's ToString method to get the String version of it. Then it's a simple matter of normal File I/O to write that string to a file. Try this example[^].
|
|
|
|
|
Hi I am working on a system where I need to read the existing contents of various spreadsheets into tables in a sql database. Eg: a spreadsheet named "Branches" needs the contents of its columns stored into a table named "branches" in the sql database. Can anyone give me a hand with this? Thanks
|
|
|
|
|
use the link below,it will be very useful.
"http://www.dotnetspider.com/qa/Question50.aspx"
<div class="ForumMod">modified on Thursday, March 20, 2008 5:31 AM</div>
|
|
|
|
|
Thanks
|
|
|
|
|
Hi All
I Want Know My Program Is Runing. If My Prog Is Runing Do'n Run Again
tanks All
|
|
|
|
|
If (UBound(Diagnostics.Process.GetProcessesByName(Diagnostics.Process.GetCurrentProcess.ProcessName)) > 0) = True Then<br />
<br />
MessageBox.Show("Application is already running")<br />
End If
"Legacy code" often differs from its suggested alternative by actually working and scaling.
—Bjarne Stroustrup
|
|
|
|
|
Google for "VB.NET Single Instance" for other ideas on how to do this that may better fit your needs.
|
|
|
|
|
Hiya,
Well if you are using VB.NET then it is quite simple to only have one instance of your application running by first going to your application properties and then under the application tab, check the checkbox that says: "Make single instance application".
LLoyd
Lloyd J. Atkinson
"Logic will get you from A to B, but imagination will take you everywhere" - ALbert Einstein
The most annoying thing about Microsoft is its obsession with change.
|
|
|
|
|
Hello,
I am running a VB6 macro from excel and I was wondering if there was a way to stop execution after I begin running the program.
Thanks,
Orlando
|
|
|
|
|
Try
Control + Break on the keyboard
"Crtl" + Break
hope this helps
Anoop
|
|
|
|
|
I have a large number of records in excel i want to load the records
in oracle table using vb.net.I dont know how to do it.If anybody can pls help me.I dont want to do it manually.
|
|
|
|
|
These are two seperate operations. The first is reading an Excel sheet. The second is writing data to an Oracle database.
See this[^] for a small discussion.
|
|
|
|
|
How do I set the width for a column in a datagrid made from a dataview?
|
|
|
|
|
Which grid control are you using? DataGridView (VS2005 and above) or the DataGrid (VS2002 and 2003)??
|
|
|
|
|
Why do I get the error can't find column 1.
dtStudList = generalQuery(int)
dt.Columns.Add(New DataColumn("Student Name", GetType(String)))
'dt.Columns.Add(New DataColumn("Parent Name", GetType(String)))
'dt.Columns.Add(New DataColumn("Phone", GetType(String)))
'dt.Columns.Add(New DataColumn("Cell", GetType(String)))
'dt.Columns.Add(New DataColumn("Instrument", GetType(String)))
For Each row As DataRow In dtStudList.Rows
dr = dt.NewRow()
dr(0) = row("stud_name")
dr(1) = row("stud_par_name")
dr(2) = row("stud_id")
dr(3) = row("stud_phone")
dr(4) = row("stud_cell")
' get student instruments
intStudList = Convert.ToInt32(row("stud_id"))
tableName = "tbl_lessons"
dtStudInst = generalQuery()
' create counter
Dim intCount As Integer = 1
For Each row2 As DataRow In dtStudInst.Rows
If intCount = 1 Then
strInst = Convert.ToString(row2("less_instrument"))
Else
strInst += ", " & Convert.ToString(row2("less_instrument"))
End If
Next
'dr(5) = strInst
dt.Rows.Add(dr)
intCount += 1
Next
Dim dgView As New DataView(dt)
dgrStudList.DataSource = dgView
|
|
|
|
|
AAGTHosting wrote: Why do I get the error can't find column 1.
On which line does this error show up??
You do know that you commented out a bunch of Column.Add() statements near the top of your code snippet, right? Those columns aren't getting created.
|
|
|
|
|
I know. I just need to know what I am doing wrong with the dataGrid. I commented those lnes out to see if any of the columns would be able to be found.
|
|
|
|
|
OK. Again, on what line does the error occur??
|
|
|
|
|
Hello
I have posted this few days ago, I want to random records form MS access database and according to Christian Graus i have tried this it's working so so but i am still not happy i am still trying it but i dont know what to do now
this was before Christian's rep.
First code
Try<br />
<br />
Me.conTest.ConnectionString = _<br />
"Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= MyTest.mdb"<br />
Catch eConnection As System.Exception<br />
MessageBox.Show(eConnection.Message)<br />
End Try<br />
<br />
'if array size is smaller then increase as per entry<br />
ArraySize = Count<br />
Dim IntegerArray(ArraySize) As Integer<br />
'sort integers<br />
Call SortArray(ArraySize, IntegerArray)<br />
Try<br />
odaTest.Fill(dsTest)<br />
'lblNo.Text = Me.BindingContext(dsTest.MyTest).Position<br />
Catch eLoad As System.Exception<br />
MessageBox.Show(eLoad.Message)<br />
End Try<br />
Call dsContacts_PositionChanged()<br />
End If<br />
<br />
this is for array <br />
<br />
Private Sub SortArray(ByVal N As Integer, ByVal SortedArray() As Integer)<br />
'increase the array size according to number of entry <br />
For I As Integer = 0 To N<br />
SortedArray(I) = I<br />
Next I<br />
End Sub
============
and this is after rep.
it's workind ok but i am sure i am doing something wrong but what ?
this is the new code
Try<br />
<br />
Me.conTest.ConnectionString = _<br />
"Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source= MyTest.mdb"<br />
Catch eConnection As System.Exception<br />
MessageBox.Show(eConnection.Message)<br />
End Try<br />
Me.conTest.Open()<br />
Dim MyData As New OleDb.OleDbCommand("SELECT *FROM MyTest ORDER BY ID ", conTest)<br />
Dim DR As Data.OleDb.OleDbDataReader = MyData.ExecuteReader<br />
Do While DR.Read = True<br />
ArraySize += 1<br />
Loop<br />
DR.Close()<br />
<br />
'if array size is smaller then increase as per entry<br />
Dim IntegerArray(ArraySize) As Integer<br />
'sort integers<br />
Call SortArray(ArraySize, IntegerArray)<br />
ReDim Asked(ArraySize)<br />
Call dsContacts_PositionChanged()<br />
<br />
Private Sub NavNext()<br />
If AskedQ >= ArraySize Then<br />
MessageBox.Show("Finish want to play again..?", "Finish", MessageBoxButtons.OK)<br />
For I As Integer = 0 To ArraySize<br />
Asked(I) = False<br />
AskedQ = 0<br />
Next<br />
Exit Sub<br />
Else<br />
Try<br />
Do<br />
odaTest.Fill(dsTest)<br />
R = CInt(Rnd() * ArraySize)<br />
'[Go to the next entry]<br />
Me.BindingContext(dsTest, "MyTest").Position = R<br />
Loop Until Asked(R) = False<br />
AskedQ += 1<br />
Asked(R) = True<br />
Catch eLoad As System.Exception<br />
MessageBox.Show(eLoad.Message)<br />
End Try<br />
'[See custom procedures]<br />
Me.dsContacts_PositionChanged()<br />
End If<br />
End Sub
waiting for your kind rep.
thanks you
|
|
|
|
|
bapu2889 wrote: Dim MyData As New OleDb.OleDbCommand("SELECT *FROM MyTest ORDER BY ID ", conTest)
Dim DR As Data.OleDb.OleDbDataReader = MyData.ExecuteReader
Do While DR.Read = True
ArraySize += 1
Loop
This is messy. If you need a count of elements, do select count(*) from mytest to get it in one go. This seems to me to be assuming that the Id's have no gaps in them, can you guarentee that ?
I'm not following how the rest works, but I *think* you're doing what I'd suggest in this instance ( keep a list of all the question Ids, then remove from that list at random to make sure no question gets asked twice )
Christian Graus - Microsoft MVP - C++
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|