اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

السلام عليكم

اريد كود لزر امر يقوم بطباعة ملف مرتبط بكود العميل او باسم العميل

بمعني اسم الملف يساوي كود العميل او اسمه

مع جزيل الشكر

قام بنشر

من هنا:

 

نفترض ان حقل كود العميل اسمه Code_ID ،

عليه يصبح امر الطباعة:

Shell ("cmd /c mspaint /p " & "D:\" & me.Code_ID & ".jpg")

.

جعفر

قام بنشر

سلمت يداك

اضافة بسيطة (نقطة في بحر علمكم الواسع)

يمكن تغيير صيغة الملف بحيث يطبع كل الامتدادات ويصبح الكود 

 

Shell ("cmd /c mspaint /p " & "D:\2017\pic\" & Me.Code_ID & ".*")

اود لوتكرمتم توضيح عمل هذا الكود 

يعني وظيفة ال shell 

هل استدعاء برنامج الرسام ثم طباعة هذا المسار 

image.png.6a97083181f715eaeafca792c7813a12.png

 

قام بنشر

لا اعتقد بأنك تستطيع الطباعة مثل ما اقترحت ،

ولكن يمكنك عمل كود بهذه الطريقة ، واللي تحدد فيه جميع صيغ الصور:

if len(Dir("D:\2017\pic\" & Me.Code_ID & ".jpg"))>0 then
  Ex=".jpg"
elseif len(Dir("D:\2017\pic\" & Me.Code_ID & ".png"))>0 then
  Ex=".png"
elseif len(Dir("D:\2017\pic\" & Me.Code_ID & ".bmp"))>0 then
  Ex=".bmp"
end if


Shell ("cmd /c mspaint /p " & "D:\2017\pic\" & Me.Code_ID & Ex)

.

الامر Shell هو (بالاضافة الى بعض المتغيرات من هذا الامر مثل ShellWait و ..) ، هو اعطاء اوامر عن طريق Command Line بين البرامج ،

لهذا السبب ، لاحظ لما انا اقترح برنامج معين مكمل للأكسس ، فهذا البرنامج يجب ان يقبل اوامر Command Line ، حتى اتحكم به برمجيا من الاكسس ، عن طريق Shell :smile:

 

في حالتنا هنا ، البرنامج mspaint يقبل التحكم به عن طريق برنامج DOS مال زمان ، واللي اليوم اصبح اسمه cmd .

 

جعفر

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • اضف...

Important Information