最后期限！请帮忙！ [英] DEADLINE! Please help!

问题描述

我需要将它转到每个文件夹：Cam 1，Cam 2，Cam 4，Cam 6，Cam 7，

和Cam 8.嗯它确实如此但它还需要将文件名更改为

抓取文件的同一文件夹，但它不是。我已经尝试过尝试过了... b $ b请帮助


示例：C：\Projects \ Darryl \Queue Review Files \2 -24 \Cam

7 \Cam7-20060224170000-01.jpg

Cam7但我一直得到的是Cam1，作为jpg的开头

名称，...... :(帮助！


Dim文件夹As String =" C：\Projects\Darryl\Queue Review Files \\ \\ &&;

DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d，yyyy"，

Nothing）.ToString（" M-d" ）&" \Cam {0} \"& cmbTime.Text


for i As Integer = 1 to 8


Dim pcb As PictureBox = ApplicationControls.FindControl（Me，pcbCam& i）


如果不是pcb什么都没有那么


pcb.Image = Image.FromFile（String.Format（folder，i））


''否则


''pcb.Image = Image.FromFile（" C：\Projects \Darryl \\队列评论文件\ 2-24 \帐号

7 \Cam7-20060224170000-01.jpg"）


结束如果


下一页我是

I need to get this to go to each folders: Cam 1, Cam 2, Cam 4, Cam 6, Cam 7,
and Cam 8. Well it does that but it also needs to change the file name to
the same folder where the file is being grabbed, BUT it doesn''t. I have
tried and tried.....please help

example: C:\Projects\Darryl\Queue Review Files\2-24\Cam
7\Cam7-20060224170000-01.jpg

Cam7 but all I keep getting is Cam1, as the beginning of the jpg
name,...:( HELP!

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\" & cmbTime.Text

For i As Integer = 1 To 8

Dim pcb As PictureBox = ApplicationControls.FindControl(Me, "pcbCam" & i)

If Not pcb Is Nothing Then

pcb.Image = Image.FromFile(String.Format(folder, i))

''Else

'' pcb.Image = Image.FromFile("C:\Projects\Darryl\Queue Review Files\2-24\Cam
7\Cam7-20060224170000-01.jpg")

End If

Next i

推荐答案

会发生什么......

我看不到格式用于更改文件名的说明符...

Dim文件夹As String =" C：\Projects \Darryl\Queue Review Files \" &

DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d，yyyy"，

Nothing）.ToString（" M-d"）& " \Cam {0} \Cam {0} - " &安培; cmbTime.Text


-

迈克


" KitKat" <き**** @ nospam.com>在消息中写道

news：％2 ****************** @ TK2MSFTNGP10.phx.gbl ...

What does happen...
I do not see the Format specifier to change the file name...

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\Cam {0}-" & cmbTime.Text

--
mike

"KitKat" <ki****@nospam.com> wrote in message
news:%2******************@TK2MSFTNGP10.phx.gbl...

我需要将它转到每个文件夹：Cam 1，Cam 2，Cam 4，Cam 6，Cam
7和Cam 8.嗯，它确实如此，但它还需要更改文件名
到抓取文件的同一文件夹，但它没有。我已经尝试过了.....请帮助

例如：C：\Projects \ Darryl \Queue Review Files \ 2-24 \Cam 7 \Cam7-20060224170000-01.jpg

Cam7但我一直得到的是Cam1，作为jpg
名称的开头，...... :(帮助！

Dim文件夹As String =" C：\Projects \Darryl \Queue Review Files \"&
DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d， yyyy"，
Nothing）.ToString（" M-d"）&" \Cam {0} \"& cmbTime.Text

对于我作为整数= 1到8
Dim pcb作为PictureBox = ApplicationControls.FindControl（我，pcbCam& i）

如果不是pcb什么都没有那么

pcb.Image = Image.FromFile（String.Format（folder，i））

''Else

''pcb.Image = Image.FromFile（" ; C：\Projects \ Darryl \Queue Review
Files \2-24\Cam 7 \Cam7-20060224170000-01.jpg& ）

结束如果

接下来我

I need to get this to go to each folders: Cam 1, Cam 2, Cam 4, Cam 6, Cam
7, and Cam 8. Well it does that but it also needs to change the file name
to the same folder where the file is being grabbed, BUT it doesn''t. I have
tried and tried.....please help

example: C:\Projects\Darryl\Queue Review Files\2-24\Cam
7\Cam7-20060224170000-01.jpg

Cam7 but all I keep getting is Cam1, as the beginning of the jpg
name,...:( HELP!

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\" & cmbTime.Text

For i As Integer = 1 To 8

Dim pcb As PictureBox = ApplicationControls.FindControl(Me, "pcbCam" & i)

If Not pcb Is Nothing Then

pcb.Image = Image.FromFile(String.Format(folder, i))

''Else

'' pcb.Image = Image.FromFile("C:\Projects\Darryl\Queue Review
Files\2-24\Cam 7\Cam7-20060224170000-01.jpg")

End If

Next i

感谢Mike为帮助！


该片段将文件名更改为：C：\Projects \Darryl \Queue Review

Files \2-24 \ Cam 1 \ Cam 1-Cam1-20060224165649-01.jpg

:(

" Mike Levine" < NA ******* @ REMOVEcomcast.net>在消息中写道

新闻：eQ ************** @ tk2msftngp13.phx.gbl ...

Thanks Mike for the help!

That snippet changes the file name to: C:\Projects\Darryl\Queue Review
Files\2-24\Cam 1\Cam 1-Cam1-20060224165649-01.jpg

:(
"Mike Levine" <na*******@REMOVEcomcast.net> wrote in message
news:eQ**************@tk2msftngp13.phx.gbl...

发生了什么...... 。
我没有看到格式说明符更改文件名...

Dim文件夹As String =" C：\Projects \Darryl \Queue Review Files \ " &
DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d，yyyy"，
Nothing）.ToString（" M-d"）& " \Cam {0} \Cam {0} - " &安培; cmbTime.Text

-
麦克

KitKat <き**** @ nospam.com>在消息中写道
新闻：％2 ****************** @ TK2MSFTNGP10.phx.gbl ...

What does happen...
I do not see the Format specifier to change the file name...

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\Cam {0}-" & cmbTime.Text

--
mike

"KitKat" <ki****@nospam.com> wrote in message
news:%2******************@TK2MSFTNGP10.phx.gbl...

我需要得到这个去每个文件夹：Cam 1，Cam 2，Cam 4，Cam 6，Cam
7和Cam 8.嗯它确实如此，但它还需要将文件名改为
抓取文件的文件夹，但它不是。我已经尝试过了.....请帮助

例如：C：\Projects \ Darryl \Queue Review Files \ 2-24 \Cam 7 \Cam7-20060224170000-01.jpg

Cam7但我一直得到的是Cam1，作为jpg
名称的开头，...... :(帮助！

Dim文件夹As String =" C：\Projects \Darryl \Queue Review Files \"&
DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d， yyyy"，
Nothing）.ToString（" M-d"）&" \Cam {0} \"& cmbTime.Text

对于我作为整数= 1到8
Dim pcb作为PictureBox = ApplicationControls.FindControl（我，pcbCam& i）

如果不是pcb什么都没有那么

pcb.Image = Image.FromFile（String.Format（folder，i））

''Else

''pcb.Image = Image.FromFile（" ; C：\Projects \ Darryl \Queue Review
Files \2-24\Cam 7 \Cam7-20060224170000-01.jpg& ）

结束如果

接下来我

I need to get this to go to each folders: Cam 1, Cam 2, Cam 4, Cam 6, Cam
7, and Cam 8. Well it does that but it also needs to change the file name
to the same folder where the file is being grabbed, BUT it doesn''t. I have
tried and tried.....please help

example: C:\Projects\Darryl\Queue Review Files\2-24\Cam
7\Cam7-20060224170000-01.jpg

Cam7 but all I keep getting is Cam1, as the beginning of the jpg
name,...:( HELP!

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\" & cmbTime.Text

For i As Integer = 1 To 8

Dim pcb As PictureBox = ApplicationControls.FindControl(Me, "pcbCam" & i)

If Not pcb Is Nothing Then

pcb.Image = Image.FromFile(String.Format(folder, i))

''Else

'' pcb.Image = Image.FromFile("C:\Projects\Darryl\Queue Review
Files\2-24\Cam 7\Cam7-20060224170000-01.jpg")

End If

Next i

那么Cam在哪里呢？文件名中的前缀来自。

您发布的代码无法显示。


" cmbTime.Text"什么是这个cmbTime对象，听起来就像那个

的bug。

" KitKat" <き**** @ nospam.com>在消息中写道

新闻：％2 **************** @ TK2MSFTNGP09.phx.gbl ...

So where does the "Cam" prefix in the file name come from.
The code you posted doesn''t show it.

"cmbTime.Text" what is this cmbTime object, it sounds like that''s where the
bug is.
"KitKat" <ki****@nospam.com> wrote in message
news:%2****************@TK2MSFTNGP09.phx.gbl...

谢谢迈克求助！

该片段将文件名更改为：C：\Projects \Darryl \Queue Review
Files \2-24\Cam 1 \Cam 1 -Cam1-20060224165649-01.jpg
:(

" Mike Levine" na ******* @ REMOVEcomcast.net>写在留言<新闻：eQ ************** @ tk2msftngp13.phx.gbl ...

Thanks Mike for the help!

That snippet changes the file name to: C:\Projects\Darryl\Queue Review
Files\2-24\Cam 1\Cam 1-Cam1-20060224165649-01.jpg

:(
"Mike Levine" <na*******@REMOVEcomcast.net> wrote in message
news:eQ**************@tk2msftngp13.phx.gbl...

发生了什么......
我不知道请参阅格式说明符以更改文件名...

Dim文件夹As String =" C：\Projects \Darryl\Queue Review Files \"&
DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d，yyyy"，
Nothing）.ToString（" M-d"）&" \Cam {0} \Cam {0} - "& cmbTime.Text

-

" KitKat"< ki **** @ nospam.com>在留言中写道
新闻：％2 ******** ********** @ TK2MSFTNGP10.phx.gbl ...

What does happen...
I do not see the Format specifier to change the file name...

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\Cam {0}-" & cmbTime.Text

--
mike

"KitKat" <ki****@nospam.com> wrote in message
news:%2******************@TK2MSFTNGP10.phx.gbl...

我需要将其转到每个文件夹：Cam 1，Cam 2，Cam 4，Cam 6， Cam
7和Cam 8.嗯，它确实如此，但它还需要将文件名改为
到抓取文件的同一个文件夹，但它不是。我已经尝试过了.....请帮助

例如：C：\Projects \ Darryl \Queue Review Files \ 2-24 \Cam 7 \Cam7-20060224170000-01.jpg

Cam7但我一直得到的是Cam1，作为jpg
名称的开头，...... :(帮助！

Dim文件夹As String =" C：\Projects \Darryl \Queue Review Files \"&
DateTime.ParseExact（cmbDate.SelectedItem.ToString，" MMMM d， yyyy"，
Nothing）.ToString（" M-d"）&" \Cam {0} \"& cmbTime.Text

对于我作为整数= 1到8
Dim pcb作为PictureBox = ApplicationControls.FindControl（我，pcbCam&
我）

如果不是pcb什么都没有那么

pcb.Image = Image.FromFile（String.Format（folder，i））

''Else

''pcb.Image = Image .FromFile（C：\Projects \ Darryl \Queue Review
Files \2-24 \Cam 7 \Cam7-20060224170000-0 1.jpg

结束如果

接下来我

I need to get this to go to each folders: Cam 1, Cam 2, Cam 4, Cam 6, Cam
7, and Cam 8. Well it does that but it also needs to change the file name
to the same folder where the file is being grabbed, BUT it doesn''t. I
have tried and tried.....please help

example: C:\Projects\Darryl\Queue Review Files\2-24\Cam
7\Cam7-20060224170000-01.jpg

Cam7 but all I keep getting is Cam1, as the beginning of the jpg
name,...:( HELP!

Dim folder As String = "C:\Projects\Darryl\Queue Review Files\" &
DateTime.ParseExact(cmbDate.SelectedItem.ToString, "MMMM d, yyyy",
Nothing).ToString("M-d") & "\Cam {0}\" & cmbTime.Text

For i As Integer = 1 To 8

Dim pcb As PictureBox = ApplicationControls.FindControl(Me, "pcbCam" &
i)

If Not pcb Is Nothing Then

pcb.Image = Image.FromFile(String.Format(folder, i))

''Else

'' pcb.Image = Image.FromFile("C:\Projects\Darryl\Queue Review
Files\2-24\Cam 7\Cam7-20060224170000-01.jpg")

End If

Next i

这篇关于最后期限！请帮忙！的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！