مرحوم محمد محمدی

🖤 پیام تسلیت

با نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفته‌اند.

ایشان سال‌ها با دانش، تجربه، اخلاق نیکو و روحیه کمک به دیگران، سهم بزرگی در رشد و پویایی انجمن داشتند و خاطره حضور ارزشمندشان همواره در ذهن اعضای انجمن باقی خواهد ماند.

مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.


انا لله و انا الیه راجعون

فراخوانی ازمحل ذخیره

Collapse
این تاپیک قفل است.
X
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • kazem1359

    • 2018/06/08
    • 331
    • 39.00

    [حل شده] فراخوانی ازمحل ذخیره

    سلام در کد زیر که قسمتی از کد اصلی هست فایل jpg از سیستم رایانه فراخوانی شده و باز میشه در این کد از درایو e:\1\banka.jpg فراخوانی میشه حالا چطور میشه کد را تغییر داد که خود سیستم تشخیص بده فایل کجاست و اونو را باز کنه (چون ممکن هست مسیر عوض بشه). ممنون

    Call Shell("explorer.exe" & " " & "e:\1\banka.jpg", vbNormalFocus)
  • mrhartsclube

    • 2017/11/15
    • 130
    • 81.00

    #2
    سلام دوست عزیز

    دستور شما میخواد عکس رو از طریق explorer باز کنه که ممکن نیست، باید یا explorer رو با یه برنامه دیگه که عکس رو باز میکنه عوض کنید یا از کد زیر استفاده کنید تا با برنامه پیشفرض سیستم عکس رو باز کنه:
    کد PHP:
    CreateObject("Shell.Application").Open ("e:\1\banka.jpg"
    شما از CurDir() میتونید برای برگردوندن آدرس پوشه ای که فایلتون داخلش ذخیره شده استفاده کنید و اگه مثلا عکستون کنار فایل اکسل باشه از کد زیر استفاده کنید:
    کد PHP:
    CreateObject("Shell.Application").Open (CurDir() & "\banka.jpg"
    [CENTER][COLOR=#696969][FONT=lucida console]... [B]Programming [/B]C# - VB.Net - VC++ - ASP.Net - HTML - CSS - JS - AS2 - AutoIt - Pascal - Delphi - PHP - Python - VBA - Etc
    [/FONT][/COLOR][SIZE=2][FONT=lucida console][COLOR=#808080]... 2D & 3D [B]Graphic Designer[/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] 2D & 3D [B]Animator [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Game [/B]Designer & [B]Hacker [/B][/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] Data [B]Forensic [/B]Expert [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Ethical [/B]Hacker [/COLOR][COLOR=#ff0000][B]|[/B][/COLOR][COLOR=#808080] [B]Pen[/B] Tester

    [/COLOR][/FONT][/SIZE][COLOR=#ff0000][FONT=courier new][SIZE=4][B].: Expert in doing what nobody else can :.[/B][/SIZE][/FONT][/COLOR][/CENTER]

    کامنت

    چند لحظه..