Error: 34 Invalid number of parameters

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    Aufgrund technischer Veränderungen ist der Mailverkehr innerhalb des Forums (Private Nachrichten) nur noch eingeschränkt möglich. Die Einschränkung ist notwendig, um zusätzliche Betriebskosten für das Forum zu vermeiden. Näheres zu den Hintergründen im Thread "Aktuelles zum Forum".Wir bitten um Verständnis.

    Hinweis kann nach Kenntnisnahme deaktiviert werden!

    • Error: 34 Invalid number of parameters

      Hallo,

      gibt es eine ausführliche Erklärung der Fehler Code 34?

      Ich habe die Länge der String etwas erweitert, auch die Variablen habe ich angepasst, trotz dessen bekomme ich hier den Fehler

      Die Variable Dim Sfc As String * 110 habe ich ebenfalls erhöht.

      BASCOM-Quellcode

      1. Dim Channel1 As String * 3
      2. Dim Channel2 As String * 3
      3. Dim Channel3 As String * 3
      4. Dim Channel4 As String * 3
      5. Dim Channel5 As String * 3
      6. Dim Channel6 As String * 3
      7. Dim Channel7 As String * 3
      8. Dim Channel8 As String * 3
      9. Sfc = "Verbunden with Laufschrif|" + Channel1 + "|" + Channel2 + "|" + Channel3 + "|" + Channel4 + "|" + Channel5 + "|" + Channel6 + "|" + _
      10. Channel7 + "|" + Channel8 + "|" + Isttimeraktiviert + "|" + Str(zt_reset) + "|" + Str(timeout_ausgeloest) + "|" + Str(eth_ip(1)) + "." + _
      11. Str(eth_ip(2)) + "." + Str(eth_ip(3)) + "." + Str(eth_ip(4)) + "|" + Str(eth_mask(1)) + "." + Str(eth_mask(2)) + "." + Str(eth_mask(3)) + "." + _
      12. Str(eth_mask(4)) + "|" + Str(eth_gateway(1)) + "." + Str(eth_gateway(2)) + "." + Str(eth_gateway(3)) + "." + Str(eth_gateway(4)) + "|" + _
      13. Eth_port + "|" + Programmablaufaktiv + "|" + Seriennummer + "|" + Devmacadresse + "|"
      14. '+ "|{013}{010}"
      15. If Flags.idx = 0 Then
      16. Flags.idx = 1
      17. Result1 = Tcpwritestr(idx , Sfc , 255 )
      18. End If
      Alles anzeigen


      davor sah es so aus (ohne Fehlermeldung)

      BASCOM-Quellcode

      1. Dim Channel1 As String * 3
      2. Dim Channel2 As String * 3
      3. Dim Channel3 As String * 3
      4. Dim Channel4 As String * 3
      5. Sfc = "Verbunden with Laufschrif|" + Channel1 + "|" + Channel2 + "|" + Channel3 + "|" + Channel4 + "|" + Isttimeraktiviert + "|" + Str(zt_reset) + "|" + Str(timeout_ausgeloest) + "|" + Str(eth_ip(1)) + "." + _
      6. Str(eth_ip(2)) + "." + Str(eth_ip(3)) + "." + Str(eth_ip(4)) + "|" + Str(eth_mask(1)) + "." + Str(eth_mask(2)) + "." + Str(eth_mask(3)) + "." + _
      7. Str(eth_mask(4)) + "|" + Str(eth_gateway(1)) + "." + Str(eth_gateway(2)) + "." + Str(eth_gateway(3)) + "." + Str(eth_gateway(4)) + "|" + _
      8. Eth_port + "|" + Programmablaufaktiv + "|" + Seriennummer + "|" + Devmacadresse + "|"
      9. '+ "|{013}{010}"
      10. If Flags.idx = 0 Then
      11. Flags.idx = 1
      12. Result1 = Tcpwritestr(idx , Sfc , 255 )
      13. End If
      Alles anzeigen
      Wer kann mir helfen?

      Danke im Voraus
      Katip
    • Scheinbar mag der Compiler nicht so viele Teile zu einem String zusammenzusetzen.
      Teile es auf in zwei Befehle, dann wird es gehen.

      BASCOM-Quellcode

      1. Sfc = "Verbunden with Laufschrif|" + Channel1 + "|" + Channel2 + "|" + Channel3 + "|" + Channel4 + "|" + Channel5 + "|" + Channel6 + "|" + _Channel7 + "|" + Channel8 + "|" + Isttimeraktiviert + "|" + Str(zt_reset) + "|" + Str(timeout_ausgeloest) + "|" + Str(eth_ip(1)) + "." + _Str(eth_ip(2)) + "." + Str(eth_ip(3)) + "." + Str(eth_ip(4)) + "|" + Str(eth_mask(1)) + "." + Str(eth_mask(2)) + "." + Str(eth_mask(3)) + "."
      2. Sfc = Sfc + Str(eth_mask(4)) + "|" + Str(eth_gateway(1)) + "." + Str(eth_gateway(2)) + "." + Str(eth_gateway(3)) + "." + Str(eth_gateway(4)) + "|" + _Eth_port + "|" + Programmablaufaktiv '+ "|" '+ Seriennummer + "|" + Devmacadresse + "|" '+ "|{013}{010}"