出来るのだＡＳＰＱ＆Ａ掲示板（過去ＬＯＧ）

まいみあさん [01/05/23 16:54:34] [191]
　　　

YasNet（管理人）さん [01/05/23 20:57:13] [192]
　　　　

まいみあさん [01/05/24 18:57:51] [201]
　　　　　

YasNet（管理人）さん [01/05/25 1:58:30] [202]
　　　　　　

まいみあさん [01/05/25 9:43:26] [203]
　　　　　　　

Ｈｒｅｆでしかできない？　

まいみあさん [01/05/25 9:59:03] [204]
　　　　　　　　

Re:Ｈｒｅｆでしかできない？　

YasNet（管理人）さん [01/05/25 11:21:43] [206]
　　　　　　　

YasNet（管理人）さん [01/05/25 11:19:25] [205]
　　　　　　　　

まいみあさん [01/05/25 14:10:24] [210]
　　　　　　　　　

Re:リンクしたエクセルファイルの更新日時　 YasNet（管理人）さん [01/05/25 19:21:02] [216]
　　　　　　　　　　

まいみあさん [01/05/28 9:02:54] [218]
　　

YasNet（管理人）さん [01/05/29 0:37:14] [219]
　　　

YasNet（管理人）さん [01/05/30 0:11:51] [221]

[186] リンクしたエクセルファイルの更新日時

投稿者：まいみあさん 01/05/23 12:13:59

はじめまして
ページのネーミングに惹かれ（＾＾；）
また、ご教授していただきたいことがあり投げさせていただきました

ｈｒｅｆでリンクしたエクセルファイルの更新日時を
取得する方法がわからず先へ進めない状態です。
どなたか分かる方お教えくださいませ
よろしくお願いします

[188] Re:リンクしたエクセルファイルの更新日時

投稿者：YasNet（管理人）さん 01/05/23 15:06:53

こんにちは　ＹａｓＮｅｔ　です
　
> ページのネーミングに惹かれ（＾＾；）
　
有難う御座います。（ちょっと恥ずかしいですが・・・
　
> ｈｒｅｆでリンクしたエクセルファイルの更新日時を
> 取得する方法がわからず先へ進めない状態です。
> どなたか分かる方お教えくださいませ
> よろしくお願いします
　
FileSystemObject　で　一度ファイル情報を取得する必要があると思いますよ。
はずしていたら　ごめんなさいね
　
では　では

[190] ASPとVBSの関係について

投稿者：まいみあさん 01/05/23 16:49:05

発言者により削除されました!!

[191] Re:リンクしたエクセルファイルの更新日時

投稿者：まいみあさん 01/05/23 16:54:34

> > ページのネーミングに惹かれ（＾＾；）
> 　
> 有難う御座います。（ちょっと恥ずかしいですが・・・
そんなことないですよ（＾＾）
　
> FileSystemObject　で　一度ファイル情報を取得する必要があると思いますよ。
> はずしていたら　ごめんなさいね
ご返答ありがとうございます
そうすることにしました。
そこで以下のソースを書いたんですが、
'Excel.Application'のところで
ActiveX コンポーネントはオブジェクトを作成できません
というエラーが出てしまいます
おそらく展開の順番が悪いのかなぁと
乏しい知識（；。；）で勝手に思っているんですが
どこをどう直せばいいのか分かりません
どなたかご教授よろしくお願いします
-----------------------
Set db = Server.CreateObject("ADODB.Connection")
db.Open DB_NAME
sql = "SELECT * FROM TABLEa WHERE FIELDname =" & request.form("aaa") & " ;"
Set info = db.Execute(sql)
set objExcelApp = Server.CreateObject("Scripting.FileSystemObject")
Set objExcelApp = CreateObject("Excel.Application")
xlsfile = info("bbb")
Set objExcelBook = objExcelApp.Workbooks.Open("c:\inetpub\wwwroot\shinjosyo\shinjosyo_file\" & xlsfile)
buf = buf & " " & objExcelBook.SIZE & ""
buf = buf & " " & objExcelBook.DateLastModified & ""
buf = buf & " " & objExcelBook.Type & ""
Response.Write buf & " " & vbNewLine
db.close

[192] Re:リンクしたエクセルファイルの更新日時

投稿者：YasNet（管理人）さんの <ホームページ> 01/05/23 20:57:13

こんにちは　YasNet　です

> > FileSystemObject　で　一度ファイル情報を取得する必要があると思いますよ。
> > はずしていたら　ごめんなさいね
> ご返答ありがとうございます
> そうすることにしました。
> そこで以下のソースを書いたんですが、
> 'Excel.Application'のところで
> ActiveX コンポーネントはオブジェクトを作成できません
> というエラーが出てしまいます
> おそらく展開の順番が悪いのかなぁと
> 乏しい知識（；。；）で勝手に思っているんですが
> どこをどう直せばいいのか分かりません
> どなたかご教授よろしくお願いします
> -----------------------
> Set objExcelBook = objExcelApp.Workbooks.Open("c:\inetpub\wwwroot\shinjosyo\shinjosyo_file\" & xlsfile)
> buf = buf & " " & objExcelBook.SIZE & ""
> buf = buf & " " & objExcelBook.DateLastModified & ""
> buf = buf & " " & objExcelBook.Type & ""
> Response.Write buf & " " & vbNewLine
> db.close
>
えーっと、エクセルのファイルってサーバーにあるのですよね？
だったら、普通のファイルとして情報取得できませんか？
　
エクセルだからって特別扱いしなくても良いとおもいますが・・・
　
では　では

[201] Re:リンクしたエクセルファイルの更新日時

投稿者：まいみあさん 01/05/24 18:57:51

> えーっと、エクセルのファイルってサーバーにあるのですよね？
> だったら、普通のファイルとして情報取得できませんか？
> 　
> エクセルだからって特別扱いしなくても良いとおもいますが・・・
> 　
> では　では

お返事遅れて申し訳ないです
下記のソースに書き直して見ましたが
文字化けしてしまいます。
ASPもプログラムを書くのも経験がほとんどないもので
もういっぱいいっぱいなのです（＾＾；）
ご教授よろしくお願いしますぅ

set objFs = Server.CreateObject("Scripting.FileSystemObject")
if objFs.FileExists(xlsfilepath) Then
set objTs = objFs.OpenTextFile(xlsfilepath)
Do While objTs.AtEndOfStream <> True
response.write objTs.ReadAll
Loop
objTs.close
else
.........
end if

[202] Re:リンクしたエクセルファイルの更新日時

投稿者：YasNet（管理人）さんの <ホームページ> 01/05/25 1:58:30

> > えーっと、エクセルのファイルってサーバーにあるのですよね？
> > だったら、普通のファイルとして情報取得できませんか？
> > 　
> > エクセルだからって特別扱いしなくても良いとおもいますが・・・
> > 　
> > では　では
>
> お返事遅れて申し訳ないです
> 下記のソースに書き直して見ましたが
> 文字化けしてしまいます。
> ASPもプログラムを書くのも経験がほとんどないもので
> もういっぱいいっぱいなのです（＾＾；）
> ご教授よろしくお願いしますぅ
>
set objFs = Server.CreateObject("Scripting.FileSystemObject")
if objFs.FileExists(xlsfilepath) Then
set objTs = objFs.GetFile(xlsfilepath)
Response.Write objTs.Size '<--- これで取得できると思いますが・・・
Set objTs = Nothing
Set objFs = Nothing
・・・
こんな　感じでいかがでしょうか
動作確認はしてませんので、だめなら教えて下さいね
　
では　では

[203] Re:リンクしたエクセルファイルの更新日時

投稿者：まいみあさん 01/05/25 9:43:26

> set objFs = Server.CreateObject("Scripting.FileSystemObject")
> if objFs.FileExists(xlsfilepath) Then
> set objTs = objFs.GetFile(xlsfilepath)
> Response.Write objTs.Size '<--- これで取得できると思いますが・・・
> Set objTs = Nothing
> Set objFs = Nothing
> ・・・
> こんな　感じでいかがでしょうか
> 動作確認はしてませんので、だめなら教えて下さいね
> 　
> では　では

おはようございます
早速試してみましたが、
5桁の数字だけ表示されエラーも出ていません。
この数字は読み込んだファイルの容量(バイト数）だと思うのですが・・・
何度もご返答いただいて恐縮です（・・；）
もう一度教えてください
よろしくお願いします

[204] Ｈｒｅｆでしかできない？

投稿者：まいみあさん 01/05/25 9:59:03

こんにちは
基本的な疑問なのですが
そもそもファイルの中身を表示するには
hrefでリンクするしかないのでしょうか？
私がやろうとしていることは
根本的に間違っているのかと思い始めました（＾＾；）
初歩的な質問でお恥ずかしいですが・・・

[206] Re:Ｈｒｅｆでしかできない？

投稿者：YasNet（管理人）さんの <ホームページ> 01/05/25 11:21:43

こんにちは　YasNet　です
　
> こんにちは
> 基本的な疑問なのですが
> そもそもファイルの中身を表示するには
> hrefでリンクするしかないのでしょうか？
> 私がやろうとしていることは
> 根本的に間違っているのかと思い始めました（＾＾；）
> 初歩的な質問でお恥ずかしいですが・・・
　
え、結局どのような事を最終的にしたいのでしょうか？

では　では

[205] Re:リンクしたエクセルファイルの更新日時

投稿者：YasNet（管理人）さんの <ホームページ> 01/05/25 11:19:25

こんにちは　失礼しました　YasNet　です
> > set objFs = Server.CreateObject("Scripting.FileSystemObject")
> > if objFs.FileExists(xlsfilepath) Then
> > set objTs = objFs.GetFile(xlsfilepath)
> > Response.Write objTs.Size '<--- これで取得できると思いますが・・・
> > Set objTs = Nothing
> > Set objFs = Nothing
> > ・・・
> > こんな　感じでいかがでしょうか
> > 動作確認はしてませんので、だめなら教えて下さいね
> > 　
> > では　では
>
> おはようございます
> 早速試してみましたが、
> 5桁の数字だけ表示されエラーも出ていません。
> この数字は読み込んだファイルの容量(バイト数）だと思うのですが・・・
> 何度もご返答いただいて恐縮です（・・；）
> もう一度教えてください
> よろしくお願いします
>
容量じゃなくて、更新日でしたね
Response.Write objTs.DateLastModified '<--- これで取得できると思います

[210] Re:リンクしたエクセルファイルの更新日時

投稿者：まいみあさん 01/05/25 14:10:24

こんにちは
YesNet管理人さんレスありがとうございます！（＾０＾）

> こんにちは　失礼しました　YasNet　です
> 容量じゃなくて、更新日でしたね
> Response.Write objTs.DateLastModified '<--- これで取得できると思います

早速使用させていただいたところ
日時、表示されました！

>え、結局どのような事を最終的にしたいのでしょうか？
では　では

う～すいません（；。；）
そうなんです。日時を取得しただけでは完璧ではなく、
また初めから説明させてもらいますと、

ASPサーバー内にある［.xls］ファイルの中身を
ユーザーが書き込みもできるようにブラウザに表示させ、
もし書き込みがあった場合に更新日時を取得し
データベースの最終更新日というフィールドもUPLOADしたい

というわけなのです。
［.xls］ファイルはＷｅｂにログインしたＩＤに対して一つ存在し
イントラネットなのですが
基本的にユーザーにはそのファイルがあるディレクトリへのアクセス権限を持ちません。
データベースにファイル名があるので
<A HREF="<%= info("xlsfile") %>">...</A>
でリンクしましたが、
それだとブラウザの中にエクセルが起動しファイルが表示され、
書き込みはできても保存ができないですよね。
そもそもディレクトリのアクセス権限がないと書き込みは出来ないのかしら？
と思いまして・・・。

以上です。
私自身が理解してないから説明すらできてないですよね（。。）ﾄﾎﾎ
何度もお手数かけておりますが
どうかご教授のほどよろしくお願いします(..)

[216] Re:リンクしたエクセルファイルの更新日時

投稿者：YasNet（管理人）さん 01/05/25 19:21:02

こんにちは　YesNet　です
　
ちょっとイメージが湧かないので明日時間が取れれば
実験したいと思います
　
では　でが

[218] Re:リンクしたエクセルファイルの更新日時

投稿者：まいみあさん 01/05/28 9:02:54

> こんにちは　YesNet　です
> 　
> ちょっとイメージが湧かないので明日時間が取れれば
> 実験したいと思います
> 　
> では　でが

ありがとうございます～！　YesNetさん！
もう私ってば説明下手ですよね。。。
本当ご親切に、助かります(^^)
取り急ぎお礼のメールです