Vraag : Hoe werk gebruikt ik dossier bij, sparen aan nieuwe plaats en oorspronkelijk houden dossier zoals Visuele Fundamentele 2008?

Scenario:

Wij hebben een verscheidenheid van HTML- dossiers binnen hun eigen omslagen.  

Hier is een voorbeeld (app1, app2 en app3 zijn enkel generische namen.  De daadwerkelijke omslagnamen variëren)

C:\inetpub\v5\eLetters\app1\app1.html
C:\inetpub\v5\eLetters\app2\subapp2\app2.html
C:\inetpub\v5\eLetters\app3\app3.html

NOTA: C:\inetpub\v5\eLetters\ zal altijd de weg van de beginfolder zijn.

Wij hebben 3 servers waarin deze HTML- dossiers zullen worden geplaatst.

Server 1 is de ontwikkelingsserver waar wij de HTML- dossiers ontwikkelen

Server 2 is de het Testen van de Verzekering van de Kwaliteit server waar deze HTML- dossiers voor nauwkeurigheid zullen worden getest

Server 3 is de server van de Productie waar de HTML- dossiers in productie zullen zijn

Doel:

Een basisprogramma is gecre�ërd waar de gebruiker de omslag kan selecteren waar HTML verblijft.  Het HTML- dossier zal in het lijstvakje samen met de folderplaats van het dossier worden vermeld.  De gebruiker zal dan de server kunnen selecteren zij willen dat het HTML- dossier worden bewaard aan (zodra zij de server selecteren het IP Adres binnen het HTML- dossier met IP van die server zal worden bijgewerkt Adres)

Als het dossier op dat dossier dan bestaat dat dossier beschrijf.

IP-Program-Screenshot.jpg (41 KB) (de Details van het Type van Dossier) 

Screenshot van programma

Uitdaging:

Ik kan het IP Adres binnen het HTML- dossier bijwerken de gebruiker met het IP Adres wordt geselecteerd op de server de geselecteerde die gebruiker wordt gebaseerd.  Ik kan ook aan dat HTML- dossier schrijven en bewaar het met de volgende code:

Probeer
Verduister sWrite als System.IO.StreamWriter = Nieuwe IO.StreamWriter (lstHTMLFiles.Items.Item (I) .ToString)
         'Schrijf nieuwe code aan HTML- Dossier, sparen Dossier en toen dicht dossier.
          sWrite.Write (rtfNewCode.Text)
          sWrite.Close ()
Vang ex als Uitzondering
Het eind probeert

Wat ik zou willen doen is:

Open het HTML- dossier dat vermeld is
Verander het IP Adres binnen het HTML- dossier
Sparen het dossier aan \ \ servername \ v5 \ eLetters \ nameoffolder \ nameofhtml.html
      Als er dossier toen bestaat beschrijf dossier
      Nota: Ik kan \ \ servername \ v5 \ eLetters \ hard coderen
Wat ik zou willen doen is vangst de volgende omslagnaam en HTML- dossier - noem met uitbreiding en voeg het als koord toe aan het eind van \ \ servername \ v5 \ eLetters \
Houd het HTML- dossier dat oorspronkelijk vermeld was zoals (het werd enkel geselecteerd) is
      Nota: Ik wil slechts dat het bijgewerkte HTML- dossier worden opgeslagen aan de geselecteerde server.

Ik geloof wij tegelijkertijd één HTML- dossier slechts zullen bewegen, maar wij zouden verscheidene HTML- dossiers in één keer kunnen bewegen.  

Zou ik als toen verklaring moeten gebruiken?

Als rbtnServer1.checked = Waar toen
      Schrijf dossier aan deze plaats
Elseif rbtnServer2.checked = Waar toen
      Schrijf dossier aan deze plaats
Elseif rbtnServer2.checked = Waar toen
      Schrijf dossier aan deze plaats Om het even welke ideeën groot zouden zijn.  
Beëindig als

De uitdaging ik heb is hoe te de rest van de weg na c:\inetpub\v5\eLetters\ te vangen die dat plaatsen in een koord en dan opslaand het bijgewerkte HTML- dossier aan de geselecteerde server en HTML houden die werd geselecteerd zoals is.

Om het even welke ideeën zouden groot zijn.
 

Antwoord : Hoe werk gebruikt ik dossier bij, sparen aan nieuwe plaats en oorspronkelijk houden dossier zoals Visuele Fundamentele 2008?

Als ik begrijp whant u correct u bent wilt te worden
„app1 \ app1.html“ van C:\inetpub\v5\eLetters\app1\app1.html
en
app2 \ subapp2 \ app2.html van C:\inetpub\v5\eLetters\app2\subapp2\app2.html
en
app3 \ app3.html C:\inetpub\v5\eLetters\app3\app3.html

Recht?

Als dat het geval toen is gebruik de code bij de bodem deze manier:

msgbox (ReplaceServerFilePath („lstHTMLFiles.Items.Item (I) .ToString“,“ \ \ servername \ v5 \ eLetters "))

1: 2: 3: 4:

Privé Functie ReplaceServerFilePath (Byval OldServerFilePath als koord, Byval NewServerFilePath) als koord Schemerige ServerFilePath als koord = oldServerFilePath.Replace („C:\inetpub\v5\eLetters“, string.empty) Terugkeer NewServerFilePath & ServerFilePath De Functie van het eind