Zum Inhalt springen

Naddel42

Mitglieder
  • Gesamte Inhalte

    35
  • Benutzer seit

  • Letzter Besuch

Alle Inhalte von Naddel42

  1. Ich habe mir den Code aus mehreren Foren zusammengebastelt, habe auch ein wenig Änderungen vorgenommen. Der Teil sollte eigentlich von meinem Rechner das aktuell eingestellte Datum nehmen. verbesserter code nun hier: Module Bla Public Datum As DateFormat, ausgabe As Integer Private Sub Main() Datum = DateString ausgabe = Str(Quersumme(Of DateFormat)) MsgBox("Die Quersumme von heute ist " + ausgabe + ".") End Sub Private Function Quersumme(ByVal stringbuffer As String) As Integer Dim loopcount As Integer Quersumme = 0 For loopcount = 1 To Len(stringbuffer) Quersumme = Quersumme + Val(Mid(stringbuffer, loopcount, 1)) Next loopcount End Function End Module Fehlermeldungen: Fehler 1 "Sub Main" wurde nicht in "ConsoleApplication1.Module1" gefunden. ConsoleApplication1 Fehler 2 "Private Function Quersumme(stringbuffer As String) As Integer" hat keine Typparameter und kann daher keine Typargumente haben. \ConsoleApplication1\Module1.vb
  2. Guten Morgen ihr lieben, ich habe folgendes Problem, bei dem ich eure Hilfe benötigen könnte: Ich möchte ein Skript schreiben, das mich automatisch mit Benutzername 'User' und Kennwort 'Quersumme Datum' anmeldet. leider scheitere ich schon bereits beim auslesen des Datums und übergabe als String. Module Module1 Dim Datum(getdatefromserver("")), ausgabe As String Private Sub Main() Datum = Str(GetDateFromServer("")) ausgabe = Str(Quersumme(Of Date)) MsgBox("Die Quersumme von heute ist " + ausgabe + ".") End Sub Private Function Quersumme(ByVal stringbuffer As String) As Integer Dim loopcount As Integer Quersumme = 0 For loopcount = 1 To Len(stringbuffer) Quersumme = Quersumme + Val(Mid(stringbuffer, loopcount, 1)) Next loopcount End Function End Module Leider wirft er mir hier schon diverse Fehler aus, und ich bin blutige Anfängerin in Sachen VB. HILFE!
  3. Saugeil! Danke! Ich glaube so langsam erschliesst sich mir die Insel!
  4. Das hiesse dann String title = response.substring(fromIndex, title.length(24)) && title.startsWith("QRE") Oder wie?!?
  5. WOW! Das ging mal schnell! Danke schonmal dafuer! OK, dann werde ich mal ein wenig herumtesten, ob ich das irgendwie hinbekomme... blutige Anfaengerin.. Habe den Code vorgelegt bekommen, und sollte mal schauen, ob ich den nach deren Wuenschen bearbeiten kann. Hat bisher auch soweit ganz gut geklappt, dank Google!
  6. Guten Morgen! Ich habe hier ein kleines Problemchen mit dem Auslesen des Substringes. Der Code: System.out.println(response); String title = response.substring(response.indexOf("<title>")+7, Response.indexOf("</title>")); System.out.println("\t" +title); Wobei die Erste Zeile folgendes auswirft: <?xml version="1.0" encoding="UTF-8"?> <query> <uuid>2hpcr4lode27fo1g802kbm7occ</uuid> <group-id type="integer">116</group-id> <items type="array"> <item matches="116"> <title>QRE_8103_C205_CNE02092FG</title> <reference-id></reference-id> </item> </items> <response nil="true"/> </query> und der Rest folgendes Selektiert: QRE_8103_C205_CNE02092FG Was auch an sich richtig ist, jedoch manchmal zweimal die Zeile <title>...</title> ausgelesen werden muss, da diese mehrfach in einem Response vorkommen kann. Ich komme hier erlich nicht weiter! Kann mir hier jemand von euch Cracks helfen?!?!

Fachinformatiker.de, 2024 by SE Internet Services

fidelogo_small.png

Schicke uns eine Nachricht!

Fachinformatiker.de ist die größte IT-Community
rund um Ausbildung, Job, Weiterbildung für IT-Fachkräfte.

Fachinformatiker.de App

Download on the App Store
Get it on Google Play

Kontakt

Hier werben?
Oder sende eine E-Mail an

Social media u. feeds

Jobboard für Fachinformatiker und IT-Fachkräfte

×
×
  • Neu erstellen...