Link to home
Start Free TrialLog in
Avatar of CahitEy
CahitEy

asked on

soap exception

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
ASKER CERTIFIED SOLUTION
Avatar of jinal
jinal
Flag of India image

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of CahitEy
CahitEy

ASKER

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 ---
Avatar of CahitEy

ASKER

there were one more array at the bottom i forget it thanks for your answer you were right
Avatar of CahitEy

ASKER

Thanks