Solved

soap exception

Posted on 2009-07-08
4
970 Views
Last Modified: 2013-11-18
i could not see any error :( please help code and error image as seen on below
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click

        Dim kaydedicim As New Sirket_islemleri.sirket_islemleri

        Dim uyeno As New uye_islemleri.uye_islemleri

        Dim row As TableRow

        Dim cell As TableCell

        Dim hid1, hid2 As HiddenField

        Dim tum_resimler = ""

        Dim n = 0

        For Each row In Table1.Rows

            For Each cell In row.Cells

                If n = 0 Then

                    hid1 = row.FindControl("hidden1_" & Left(cell.ID, Len(cell.ID) - 4))

                    hid2 = row.FindControl("hidden2_" & Left(cell.ID, Len(cell.ID) - 4))

                    If Not (hid2.Value = hid1.Value) And Not (hid1.Value = "") Then

                        If tasi(hid1.Value) Then

                            silici(hid1.Value, hid2.Value)

                        End If

                    ElseIf hid1.Value = "" And Not (hid2.Value = "") Then

                        hid1.Value = hid2.Value

                    End If

                    If Not (hid1.Value = "") Then

                        tum_resimler += hid1.Value & ","

                    End If

                End If

            Next

            If n = 0 Then

                n = 1

            Else

                n = 0

            End If

        Next

        Dim genelislem As New Genel_islemler.Genel_Islemler

        Dim kayit

        If Button1.Text = "Kaydet" Then

            Dim no = uyeno.UyeBilgisiAl(Context.User.Identity.Name, uye_islemleri.Kullanici_bilgisi.kimlik)

            kayit = kaydedicim.kayit_al(TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox6.Text, TextBox4.Text, TextBox5.Text, TextBox7.Text, DropDownList2.SelectedItem.Value, DropDownList3.SelectedItem.Value, DropDownList4.SelectedItem.Value, DropDownList5.SelectedItem.Value, TextBox8.Text, DropDownList6.SelectedItem.Value, "", Editor1.Content, TextBox9.Text, no, DropDownList1.SelectedItem.Value)

        Else

            kaydedicim.Guncelle(TextBox1.Text, TextBox2.Text, TextBox3.Text, TextBox6.Text, TextBox4.Text, TextBox5.Text, TextBox7.Text, DropDownList2.SelectedItem.Value, DropDownList3.SelectedItem.Value, DropDownList4.SelectedItem.Value, DropDownList5.SelectedItem.Value, TextBox8.Text, DropDownList6.SelectedItem.Value, "", Request.QueryString("no"), Editor1.Content, TextBox9.Text, DropDownList1.SelectedItem.Value)

        End If

        If Not (Request.QueryString("no") = "") Then

            genelislem.resim_sil("sirket", Request.QueryString("no"))

            genelislem.resim_kayit(Request.QueryString("no"), "sirket", Left(tum_resimler, Len(tum_resimler) - 1))

        Else

            genelislem.resim_sil("sirket", kayit)

            genelislem.resim_kayit(kayit, "sirket", Left(tum_resimler, Len(tum_resimler) - 1))

        End If

        Response.Redirect("default.aspx")

    End Sub
 
 
 
 

the code which gives error  from web service :
 
 
 

    <WebMethod()> _

    Function resim_kayit(ByVal bolumno As String, ByVal bolum As String, ByVal bilgi As String)

        Dim connection

        Dim Ar_Bilgi As Array = bilgi.split(",")

        Dim adres = ""

        For i = 0 To Ar_Bilgi.Length

            adres = adres & sql.resimler_ekle.ToString.Replace("bolumno1", "bolumno" & i)

        Next

        connection = ConfigurationSettings.AppSettings("ConnectionString")

        Dim cmd As New MySqlCommand(sql.resimler_ekle, New MySqlConnection(connection))

        cmd.Parameters.Add("?bolumno", bolumno).MySqlDbType = MySqlDbType.VarChar

        cmd.Parameters.Add("?bolum", bolum).MySqlDbType = MySqlDbType.VarChar

        For i = 0 To Ar_Bilgi.Length

            cmd.Parameters.Add("?bolumno" & i, Ar_Bilgi(i)).MySqlDbType = MySqlDbType.Datetime

        Next

        cmd.Connection.Open()

        cmd.ExecuteNonQuery()

        cmd.Connection.Close()

    End Function

Open in new window

hata.jpg
0
Comment
Question by:CahitEy
  • 3
4 Comments
 
LVL 15

Accepted Solution

by:
jinal earned 500 total points
Comment Utility
Try this.
In WebMethod  i just changes for loop to this For i = 0 To Ar_Bilgi.Length - 1 .
 
 

<WebMethod()> _

    Function resim_kayit(ByVal bolumno As String, ByVal bolum As String, ByVal bilgi As String)

        Dim connection

        Dim Ar_Bilgi As Array = bilgi.split(",")

        Dim adres = ""

        For i = 0 To Ar_Bilgi.Length - 1 

            adres = adres & sql.resimler_ekle.ToString.Replace("bolumno1", "bolumno" & i)

        Next

        connection = ConfigurationSettings.AppSettings("ConnectionString")

        Dim cmd As New MySqlCommand(sql.resimler_ekle, New MySqlConnection(connection))

        cmd.Parameters.Add("?bolumno", bolumno).MySqlDbType = MySqlDbType.VarChar

        cmd.Parameters.Add("?bolum", bolum).MySqlDbType = MySqlDbType.VarChar

        For i = 0 To Ar_Bilgi.Length - 1

            cmd.Parameters.Add("?bolumno" & i, Ar_Bilgi(i)).MySqlDbType = MySqlDbType.Datetime

        Next

        cmd.Connection.Open()

        cmd.ExecuteNonQuery()

        cmd.Connection.Close()

    End Function

Open in new window

0
 
LVL 1

Author Comment

by:CahitEy
Comment Utility
I tryed it and i tryed it again if i got a mistake but the result is same ::


System.Web.Services.Protocols.SoapException: Server was unable to process request. ---> System.IndexOutOfRangeException: Index was outside the bounds of the array.
  at System.Array.InternalGetReference(Void* elemRef, Int32 rank, Int32* pIndices)
  at System.Array.GetValue(Int32 index)
  at Microsoft.VisualBasic.CompilerServices.Symbols.Container.GetArrayValue(Object[] Indices)
  at Microsoft.VisualBasic.CompilerServices.NewLateBinding.InternalLateIndexGet(Object Instance, Object[] Arguments, String[] ArgumentNames, Boolean ReportErrors, ResolutionFailure& Failure)
  at Microsoft.VisualBasic.CompilerServices.NewLateBinding.LateIndexGet(Object Instance, Object[] Arguments, String[] ArgumentNames)
  at Genel_Islemler.resim_kayit(String bolumno, String bolum, String bilgi)
  --- End of inner exception stack trace ---
0
 
LVL 1

Author Comment

by:CahitEy
Comment Utility
there were one more array at the bottom i forget it thanks for your answer you were right
0
 
LVL 1

Author Closing Comment

by:CahitEy
Comment Utility
Thanks
0

Featured Post

Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

Join & Write a Comment

Shoutout to Emily Plummer (http://www.experts-exchange.com/members/eplummer26.html) for giving me this article! She did most of it, I just finished it up and posted it for her :)    Introduction In a previous article (http://www.experts-exchang…
JavaScript has plenty of pieces of code people often just copy/paste from somewhere but never quite fully understand. Self-Executing functions are just one good example that I'll try to demystify here.
Viewers will learn about the different types of variables in Java and how to declare them. Decide the type of variable desired: Put the keyword corresponding to the type of variable in front of the variable name: Use the equal sign to assign a v…
The viewer will learn how to create a basic form using some HTML5 and PHP for later processing. Set up your basic HTML file. Open your form tag and set the method and action attributes.: (CODE) Set up your first few inputs one for the name and …

771 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

10 Experts available now in Live!

Get 1:1 Help Now