امروز این تابع رو که از اسمش هم پیداست که کارش “تغییر نام فایل” هست رو براتون قرار میدم. امیدوارم براتون کاربردی باشه.
یادتون نره کتابخونه ی Phone رو تیک بزنید.
✨ نکات مهم:
• کد آماده و تستشده (1 قطعهکد)
• کار با کتابخانههای: Phone
• کپی و استفاده مستقیم در پروژه B4A
📚 کتابخانههای مورد نیاز:
Phone
(از مسیر Libraries در محیط B4A تیک بزنید.)
🚀 نحوه استفاده:
کد زیر را کپی کنید و در Sub یا ماژول مناسب پروژه خود قرار دهید؛ کتابخانههای اعلامشده را تیک بزنید.
| دستهبندی | تکه کدها |
| تاریخ انتشار | ۲۷ شهریور ۱۴۰۵ - ۰۲:۵۵ |
| تعداد بازدید | ۱ |
| تعداد فروش | ۰ |
| فرمت تحویل | فایل دانلودی (بعد از پرداخت آنی فعال میشود) |
| پشتیبانی | تیکت پشتیبانی در پنل کاربری |
ویژگیهای کلیدی
- تکهکد آماده B4A
- کاملاً رایگان
- کد تستشده با توضیح فارسی
- کتابخانه: Phone
هنوز نظری ثبت نشده است. اولین نفر باشید!
برای ثبت نظر وارد شوید. (ثبت نظر پس از خرید فعال میشود)
Sub RenameFile(OriginalFileName As String, NewFileName As String) As Boolean
Dim Result As Int
Dim StdOut, StdErr As StringBuilder
StdOut.Initialize
StdErr.Initialize
Dim Ph As Phone
Result = Ph.Shell("mv " & OriginalFileName & " " & NewFileName, Null, StdOut, StdErr)
If Result = 0 Then
Return True
Else
Return False
End If
End Sub