Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


3813 / 13645 ツリー ←次へ | 前へ→

【60006】ファイルサーバーにフォルダ作成時のアクセス権限 ON 09/1/23(金) 12:10 質問[未読]
【60011】Re:ファイルサーバーにフォルダ作成時のア... neptune 09/1/23(金) 13:55 発言[未読]
【60014】Re:ファイルサーバーにフォルダ作成時のア... ON 09/1/23(金) 15:05 お礼[未読]
【60052】Re:ファイルサーバーにフォルダ作成時のア... ON 09/1/26(月) 9:51 発言[未読]
【60058】Re:ファイルサーバーにフォルダ作成時のア... neptune 09/1/26(月) 13:22 発言[未読]
【60064】Re:ファイルサーバーにフォルダ作成時のア... ON 09/1/26(月) 16:13 お礼[未読]

【60006】ファイルサーバーにフォルダ作成時のアク...
質問  ON  - 09/1/23(金) 12:10 -

引用なし
パスワード
   こんにちは よろしくお願い致します
下記でサーバー上にフォルダを作成できますが

参照権限しかない無い場合はフォルダが作成できません
ログインしなおして、編集権限のあるIDで作業することは出来ますが

コード上で、
ユーザー名、パスワードを付加して
フォルダを作成することは出来ますでしょうか

ご教授よろしくお願い致します


'フォルダー作成(C:\hoge_Folder、C:\hoge_Folder\form)
Sub AddNewFolder2(mk_fld As String, mk_SB_fld As String)

'On Error Resume Next

'参照設定:Microsoft Scripting RunTime

Dim myFileSystem As Scripting.FileSystemObject
Dim myFolder As Scripting.Folder
Dim MySubFolders As Scripting.Folders
Dim mySubFolder As Scripting.Folder
Dim MySubFolders2 As Scripting.Folders
Dim MySubFolder2 As Scripting.Folder

Set myFileSystem = New Scripting.FileSystemObject
Set myFolder = myFileSystem.GetFolder(mk_fld) 'ターゲットフォルダ
Set MySubFolders = myFolder.SubFolders
Set mySubFolder = MySubFolders.Add(mk_SB_fld)  '追加サブフォルダ
'Set MySubFolders2 = MySubFolder.SubFolders
'Set MySubFolder2 = MySubFolders2.Add("Test2") '追加サブサブフォルダ

'Set MySubFolder2 = Nothing
'Set MySubFolders2 = Nothing
Set mySubFolder = Nothing
Set MySubFolders = Nothing
Set myFolder = Nothing
Set myFileSystem = Nothing

'On Error GoTo 0

End Sub

【60011】Re:ファイルサーバーにフォルダ作成時の...
発言  neptune  - 09/1/23(金) 13:55 -

引用なし
パスワード
   ▼ON さん:
こんにちは

私にはアドバイスする知識が無いので回答がつきやすい所を紹介します。
プロが集まってますのでこの手のはアドバイスをもらい易いです。

ht tp://hanatyan.sakura.ne.jp/
ht tp://homepage1.nifty.com/MADIA/
のVB6の板で質問すると良いでしょう。

※1紹介の掲示板で質問する時は「使用上の注意」、「初めにお読み下さい」
等は必読して下さい。
的確なアドバイスをもらえますがその分、Excel VBAの回答者より
質問者にも厳しいです。

※2紹介の掲示板で質問する時は、この掲示板でキチンと、他の掲示板で
質問する旨書いておかないと、移動先でマルチと判断されまともな
回答は付きません。

#ON さんは大丈夫と思いますが、間違ってもコード書いて欲しいとは
書かない方が良いです。禁句の1つです。

【60014】Re:ファイルサーバーにフォルダ作成時の...
お礼  ON  - 09/1/23(金) 15:05 -

引用なし
パスワード
   ▼neptune さん:
こんにちは
いつもありがとうございます

ご紹介頂いたURLは、検索結果で見たことはあったのですが
質問したことはありませんでした

詳しい諸注意、心構え ありがとうございます


少しググっていて
'Shell ("net use \\サーバー名\共有名 パスワード /user:ユーザー名")
を見つけて
試してみたのですが
ネットワークドライブの割り当てが出来て、フォルダ内を見ることは出来ましたが
手動で、フォルダを作成しようとすると
 フォルダ '新しいフォルダ' を作成できません。
 アクセスが拒否されました。
となってしまいました

VBの知識はほとんど無いので・・・
ちょっとどんなもんかと思いますが
頂いたアドバイスで、Qを引っ越そうと思います

少し落ち着いたら
引越し先のURLあげたいと思います


ありがとうございました

【60052】Re:ファイルサーバーにフォルダ作成時の...
発言  ON  - 09/1/26(月) 9:51 -

引用なし
パスワード
   ▼neptune さん:
遅くなりました m(_ _)m

あちらにお見えになっていたので、すでにご存知かと思いますが
一応、URL記載しておきます

ファイルサーバアクセス権
ht tp://hanatyan.sakura.ne.jp/vb60bbs/wforum.cgi?mode=allread&no=13356&page=0
でQしています


ちょっと、寄り道ですが
直接、使用することはほとんどないとおもっていますが、
向うで、VB系の情報を改めて眺めてみて
ちょっとだけVB6,VB2008を試してみました

以前から、.NET Framework って何、と思っていたのですが
VB6以後(Vb6含まず)の、共通コンポーネント?みたいなものだと感じました
しかも、C系まで共通・・・まったく関係ないですが・・・

で、VB6は、VBAと大差なくわかるような気もしますが
.NETでは、単語?そのものもかなり違っているように思えました

ただ、VB2008は、かなり便利そうな気もしてちょっと魅力を感じてしまいました
が、単語?がわからずに苦労しそうな気もします

VBAに対応する単語等は、簡単に取得することは出来ますか?
ずうずうしいお願いとおもいますが
アドバイス等ありましたら簡単にコメント頂けるとうれしいです

もちろん、ノーレスでかまいませんです

【60058】Re:ファイルサーバーにフォルダ作成時の...
発言  neptune  - 09/1/26(月) 13:22 -

引用なし
パスワード
   ▼ON さん:
こんにちは

あちらで、的確なResが付いていたようですね。^ ^

>以前から、.NET Framework って何、と思っていたのですが
>VB6以後(Vb6含まず)の、共通コンポーネント?みたいなものだと感じました
>しかも、C系まで共通・・・まったく関係ないですが・・・
VB,C#,VC++など共通のコンポーネントですね。

>ただ、VB2008は、かなり便利そうな気もしてちょっと魅力を感じてしまいました
>が、単語?がわからずに苦労しそうな気もします
>
>VBAに対応する単語等は、簡単に取得することは出来ますか?
できません。

資料としてはMSに「VB マイグレーション Tips」
ht tp://msdn.microsoft.com/ja-jp/vbasic/cc707256.aspx
というのがありますが、これが広汎な事柄について書いているように
思います。花ちゃんさんのサイトにもTipsが沢山あります。

「Visual Basic 中学校 」
ht tp://homepage1.nifty.com/rucio/main/main.htm
には大変優れた講座、掲示板もあります。

ここから個人的な感想ですが、
VB6までと、VB.net以降とでは別言語と思って下さい。それくらい違います。
私は、C#⇔VBの書き換えが簡単に出来るように極力VB6の時代のコマンドは
使わず、.net frameworkのコマンドで書くようにしています。
極力「Microsoft.VisualBasic 名前空間」 は使わないという事です。
使わなくても書けます。

そうすれば、.net以降のVB,C#,VC++は全てframeworkを使うための言語ですから
(VC++はMFC、SDKでもかけるのでちょっと毛色が違いますが。)
frameworkの取り扱いさえ慣れておけば、全ての言語でそれは共通だからです。
後は、それぞれの言語特有の文法に従えばOK。

なので、VB,C#など何を使うかは個人の好みとは思います。
VC++は又別もんですけど。

ちなみに、ネット上で公開されているサンプルはVBよりC#がかなり
多いように思います。

更に脱線しますが、先日、自分の趣味用にちょっとした計算するだけの
単機能のツールを作ったんですが、フリーで公開しようかなぁ・・・・
と考えていたのでVC++使用して、万年初心者のC+++SDKで書いてしまいました。
ホントにごく簡単なものですけど。

なんといってもこれならVB6のランタイムもMFCも.net frameworkも要りません
からね。インストーラも要らないし。(ショートカット作成して張り付けるだけ
で、すみますから。)
・・・といいつつ公開も面倒なので自分で使うだけになりそうですが^ ^;
ちなみに、VC++2008でもC+++SDKで書けます。

【60064】Re:ファイルサーバーにフォルダ作成時の...
お礼  ON  - 09/1/26(月) 16:13 -

引用なし
パスワード
   ▼neptune さん:
ありがとうございます

>あちらで、的確なResが付いていたようですね。^ ^
失礼しました
お礼が遅れて申し訳ありませんでした  m(_ _)m
ただ、レベルが低くて、即解決とはなっていませんが・・・

そのうち再Qすることになりそうな気がしていますが
その際は、お気が向いたらよろしくお願い致します


.NET Frameworkの詳細な解説ありがとうございます


>>VBAに対応する単語等は、簡単に取得することは出来ますか?
>できません。
フニャー そうなんですか
残念です

今後のVBAは、どうなるんですか?
あそこまで共通化されているのなら同じになるような気もしますが・・
なら、やむを得ずやるしかないかとあきらめもつくのですが・・

>frameworkの取り扱いさえ慣れておけば、全ての言語でそれは共通だからです。

>ちなみに、ネット上で公開されているサンプルはVBよりC#がかなり
>多いように思います

そうなんですよね
APIコピペでしか使えず情けない思いをすることが多いので
出来れば使いこなせたいなという思いはあるのですが・・・


>なんといってもこれならVB6のランタイムもMFCも.net frameworkも要りません
>からね。インストーラも要らないし。(ショートカット作成して張り付けるだけ
>で、すみますから。)
レベルでないですが、参考になります

>ちなみに、VC++2008でもC+++SDKで書けます。
きっと、これが使えるようになりたいが私の夢みたいなです

詳細な解説ありがとうございました

3813 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free