Jump to content

-Phoenix-

Members
  • Gesamte Inhalte

    106
  • Registriert seit

  • Letzter Besuch

Beiträge erstellt von -Phoenix-

  1. huhu, ich habe folgendes problem:

    ich habe freigaben erstellt auf einem winxp rechner und diese je nach benutzter mit ntfs beschränkt. allerdings öffnet sich dieses "verbindungsfenster" nicht( also das wo ich eingeben muss wie mein benutzername und mein passwort ist), wenn ich auf die freigaben zugreifen

    will.

    somit werden mir alle rechte auf dem win xp rechner verweigert, ich kann die freigaben zwar alle sehen aber nicht mehr, ist ja auch klar, da der rechner ja net weiß welcher user ich bin.

    ich frage mich nun wie es es einrichte das immer automatisch dieses dumme fenster aufgeht wenn ich den rechner anspreche?? :confused:

     

    danke schon mal ;)

  2. so sieht der quellcode aus

    Dim oTable As Word.Table

    Dim oWord As Word.Application

    oWord = New Word.Application

    Dim oDoc As Word.Document

    Dim wdUnits As Word.WdUnits

     

    oWord.Visible = True

    oDoc = oWord.Documents.Add(Template:="C:\dok2.doc", NewTemplate:=False)

    oDoc.FormFields.Item("Name").Range.Text = txtName.Text

    oDoc.FormFields.Item("PLZ").Range.Text = txtPLZ.Text

    oDoc.FormFields.Item("Ort").Range.Text = txtOrt.Text

     

    'With Word.Application

    oWord.Selection.TypeText(Text:="Nr")

    oWord.Selection.MoveRight(Unit:=wdUnits.wdCell)

    oWord.Selection.Font.Bold = True

    oWord.Selection.Font.Size = 14

    oWord.Selection.TypeText(Text:="Nachname")

    oWord.Selection.MoveRight(Unit:=WdUnits.wdCell)

    oWord.Selection.Font.Bold = True

    oWord.Selection.Font.Size = 14

    oWord.Selection.TypeText(Text:="Vorname")

×
×
  • Neu erstellen...