jeg har et script lavet i c# der gør netop det.. man taster selv navnet som billedet skal have på serveren og uploader. Jeg har konverteret scriptet til VB, men poster det også lige i c# da det kan være det ikke funker ordentligt efter konvertering(har ikke testet det):
<script language="vb" runat="server">
Sub btnUploadTheFile_Click(ByVal Source As Object, ByVal evArgs As EventArgs)
Dim strFileNameOnServer As String = txtServername.Value
Dim strBaseLocation As String = Server.MapPath("../galleri/")
If "" = strFileNameOnServer Then
txtOutput.InnerHtml = "Fejl - Der skal angives et navn."
Return
End If
If Not (Nothing = uplTheFile.PostedFile) Then
Try
uplTheFile.PostedFile.SaveAs(strBaseLocation + strFileNameOnServer + ".jpg")
txtOutput.InnerHtml = "Filen <b>" + strBaseLocation + strFileNameOnServer + "</b> er blevet uploadet"
Catch e As Exception
txtOutput.InnerHtml = "Fejl ved lagring af <b>" + strBaseLocation + strFileNameOnServer + "</b><br>" + e.ToString
End Try
End If
End Sub
</script>
<table align="left">
<form enctype="multipart/form-data" runat="server">
<tr>
<td><div align="left"><span class="style26">Vælg Fil som skal uploades:</span></div></td>
<td><input id="uplTheFile" type=file runat="server"></td>
</tr>
<tr>
<td><div align="left"><span class="style26">Navn som vises i galleriet:</span></div></td>
<td><input id="txtServername" type="text" runat="server">
<span class="style27"> .jpg</span></td>
</tr>
<tr>
<td colspan="2">
<input type=button id="btnUploadTheFile" value="Upload"
OnServerClick="btnUploadTheFile_Click" runat="server">
</td>
</tr>
</form>
</table>
og lige koden i C#:
<script language="C#" runat="server">
void btnUploadTheFile_Click(object Source, EventArgs evArgs)
{
string strFileNameOnServer = txtServername.Value;
string strBaseLocation = Server.MapPath("../galleri/");
if ("" == strFileNameOnServer)
{
txtOutput.InnerHtml = "Fejl - Der skal angives et navn.";
return;
}
if (null != uplTheFile.PostedFile)
{
try
{
uplTheFile.PostedFile.SaveAs(strBaseLocation+strFileNameOnServer+".jpg");
txtOutput.InnerHtml = "Filen <b>"+strBaseLocation+strFileNameOnServer+"</b> er blevet uploadet";
}
catch (Exception e)
{
txtOutput.InnerHtml = "Fejl ved lagring af <b>" +
strBaseLocation+strFileNameOnServer+"</b><br>"+ e.ToString();
}
}
}
</script>
Vh Nicki
