نمایش نتایج 1 تا 7 از 7

نام تاپیک: آموزش: تغییر نام فایل های هم نام در هنگام آپلود

  1. #1
    کاربر دائمی آواتار abadanboy
    تاریخ عضویت
    شهریور 1386
    محل زندگی
    شاهین شهر - اصفهان
    پست
    315

    آموزش: تغییر نام فایل های هم نام در هنگام آپلود

    یه چند تا از دوستان خواستار تغییر نام فایل های هم نام توسط خود برنامه شده بودند من اینو نوشتم اگه بهتر کسی داره بزاره
    برنامه زیر به این صورت هست که اگه فایل هم نام رو پیدا کرد اونو به این صورت تغییر نام میده
    file.jpg
    file(1).jpg
    file(2).jpg
    مثل تغییر نام فایل ها تو موبایل
    موفق باشید

    C#‎
    using System;
    using System.Data;
    using System.Configuration;
    using System.Web;
    using System.Web.Security;
    using System.Web.UI;
    using System.Web.UI.WebControls;
    using System.Web.UI.WebControls.WebParts;
    using System.Web.UI.HtmlControls;
    using System.IO;
    public partial class _Default : System.Web.UI.Page
    {
    int i = 0;
    protected void Page_Load(object sender, EventArgs e)
    {
    }
    protected void Button1_Click(object sender, EventArgs e)
    {
    int s=fw1.FileName.LastIndexOf('.');
    string type = fw1.FileName.Substring(s);
    string name = fw1.FileName.Substring(0,s);
    bindname(name,name,type);

    }
    void bindname(string m,string n,string t) {
    if (File.Exists(MapPath("pic\\") + m+t))
    {
    i++;
    m = n + "(" + i + ")";
    bindname(m,n,t);
    }
    else
    {
    fw1.PostedFile.SaveAs(MapPath("pic\\")+m+t);
    }
    }
    }


    Asp.net
    <%@ Page Language="C#‎" AutoEventWireup="true"  CodeFile="Default.aspx.cs" Inherits="_Default" %>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <html xmlns="http://www.w3.org/1999/xhtml" >
    <head runat="server">
    <title>Untitled Page</title>
    </head>
    <body>
    <form id="form1" runat="server">
    <div>

    <asp:fileupload ID="fw1" runat="server"></asp:fileupload>
    <asp:Button ID="Button1" runat="server"
    Text="Button" OnClick="Button1_Click" />
    </div>
    </form>
    </body>
    </html>
    فایل های ضمیمه فایل های ضمیمه

  2. #2
    سلام،
    ممنون از روشی که دادید
    اما برای من از این خطا رو داد:
     
    Compiler Error Message: BC30451: Name 'File' is not declared

     
    if (File.Exists(MapPath("Image\\") + m+t)) then


    من از asp.net1.1 استفاده می کنم ....

  3. #3
    کاربر دائمی آواتار abadanboy
    تاریخ عضویت
    شهریور 1386
    محل زندگی
    شاهین شهر - اصفهان
    پست
    315
    من با این مشکل مواجه نشدم از تبدیل کدهات به vb اطمینان پیدا کن شاید تو این مورد مشکل به وجود اومده باشه

  4. #4
    به جای File از System.Io.File استفاده کن Ok میشه.

  5. #5
    کاربر دائمی آواتار mahdi_farhani
    تاریخ عضویت
    مرداد 1383
    محل زندگی
    فولادشهر - اصفهان
    سن
    32
    پست
    1,227
    با تشکر از دوست عزیزمون از پست زیباش ، ولی این پست با Ajax مشکل پیدا میکنه ، بهتره بود به جای ذخیره کردن اون
    fw1.PostedFile.SaveAs(MapPath("pic\\")+m+t);

    یک خروجی رشته ایی به عنوان مسیر و نام فایل بدید ، تا اگر خواستید از کنترلی و یا هرچیزی که با Ajax سازگار باشه بتونید استفاده کنید .

  6. #6

    نقل قول: آموزش: تغییر نام فایل های هم نام در هنگام آپلود

    دوستانی که اینو به VB تبدیل کردن اگه امکان داره کد اون رو هم قرار بدن
    ممنون

  7. #7
    کاربر دائمی آواتار sahele_sheni
    تاریخ عضویت
    مرداد 1387
    محل زندگی
    AhVaZ
    پست
    318

    نقل قول: آموزش: تغییر نام فایل های هم نام در هنگام آپلود


    Imports System
    Imports System.Data
    Imports System.Configuration
    Imports System.Web
    Imports System.Web.Security
    Imports System.Web.UI
    Imports System.Web.UI.WebControls
    Imports System.Web.UI.WebControls.WebParts
    Imports System.Web.UI.HtmlControls
    Imports System.IO
    Public Partial Class _Default
    Inherits System.Web.UI.Page
    Private i As Integer = 0
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
    End Sub
    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
    Dim s As Integer = fw1.FileName.LastIndexOf("."c)
    Dim type As String = fw1.FileName.Substring(s)
    Dim name As String = fw1.FileName.Substring(0, s)

    bindname(name, name, type)
    End Sub
    Private Sub bindname(ByVal m As String, ByVal n As String, ByVal t As String)
    If File.Exists(MapPath("pic\") + m + t) Then
    i += 1
    m = (n & "(") + i & ")"
    bindname(m, n, t)
    Else
    fw1.PostedFile.SaveAs(MapPath("pic\") + m + t)
    End If
    End Sub
    End Class

تاپیک های مشابه

  1. تغییر ارتفاع lineبا تغییر ارتفاع Textbox در گزارش
    نوشته شده توسط payam59 در بخش Access
    پاسخ: 22
    آخرین پست: یک شنبه 03 شهریور 1387, 16:41 عصر
  2. تغییر اندازه ارتفاع QRShape با تغییر ارتفاع DetailBand
    نوشته شده توسط mojtaba_z در بخش برنامه نویسی در Delphi
    پاسخ: 3
    آخرین پست: پنج شنبه 07 تیر 1386, 09:49 صبح
  3. تغییر Toolbar با تغییر Thems ویندوز XP
    نوشته شده توسط na3er-faraji در بخش VB.NET
    پاسخ: 2
    آخرین پست: پنج شنبه 06 مهر 1385, 14:08 عصر
  4. غیر قابل تغییر کردن فرم about تغییر desktop تو vb
    نوشته شده توسط Payman62 در بخش برنامه نویسی در 6 VB
    پاسخ: 8
    آخرین پست: یک شنبه 31 اردیبهشت 1385, 13:12 عصر
  5. تغییر در PHPbb (تغییرات خیلی کلی)
    نوشته شده توسط nasr در بخش PHP
    پاسخ: 4
    آخرین پست: جمعه 05 فروردین 1384, 12:06 عصر

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •