vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
 NEU! sevCoolbar 3.0 - Professionelle Toolbars im modernen Design!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Visual-Basic Einsteiger
instr - problem 
Autor: Agi_
Datum: 02.02.09 12:50
Hallo,

also..ich habe eine Datei mit folgendem Inhalt:
...
user_pref("signon.SignonFileName", "90847664.s");
user_pref("timebomb.first_launch_time", "1031291068810000");
user_pref("mail.server.server9.port", 993);
user_pref("mail.server.server9.socketType", 3);
user_pref("mail.server.server7.port", 993);
user_pref("mail.server.server7.socketType", 3);
....

Und möchte nun prüfen ob die Einträge schon vorhanden sind, wenn nicht, schreibe ich sie nachträglich rein und hier beginnt mein Problem..:

Ich will z.B. prüfen ob darin "993" , "port" und "server9" enthalten ist (in einer Zeile).
- er prüft ob "port" und "993" drin sind, aber mit "server9" kommt er nicht klar ...?

Auzug aus meinen Skript: 
set prefs0=fso2.opentextfile("e:\\test\\prefs.js",1,false)
while prefs0.AtEndOfStream =False 
line2=prefs0.readline 
line3=Replace(line2, Chr(34), ",") REM aus verzweiflung gesplittet; dachte in _
  stören die 
line4=Replace(line3, ".", ",")  REM Anführungszeichen oder die Punkte dazwischen 
REM servernr= "server" & servind
REM msgbox "nr:" & servernr
if ((servind > 0) AND (instr(1,line4,"server9",1)) AND (instr( _
  1,line2,"993",1)) AND (instr(1,line2,"port",1)) ) then 
hilf=false
msgbox "hilf= " & hilf 
end if
wend
prefs0.close
Verstehe nich wo ich hier den Fehler machen, oder was da schief läuft, würde mich über Hilfe von euch sehr freuen

Agi
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
instr - problem821Agi_02.02.09 12:50
Re: instr - problem474smither02.02.09 19:24
Re: instr - problem470Agi_02.02.09 20:44

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
  
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel