Hallo zusammen,
ich habe eine Frage zu folgendem Code es geht um die Einbindung eines Netzwerkpfades in eine CRM Entität.:
__________________________________________________________
// JScript File
function OnCrmPageLoad()
{
var networkPath = new NetworkPath("fax");
//Example Add query string parameter
networkPath.Params.Add("test","1");
//Example Remove query string parameter
networkPath.Params.Remove("test");
//Example change control default style
networkPath.Style.Add("color","red");
//Transform the text field into a network path field
networkPath.Transform();
}
function NetworkPath(baseControlId)
{
nk = this;
nk.ID = baseControlId;
nk.Control = document.all[nk.ID];
/* Default Path */
nk.Path = "\\\\127.0.0.1\\Files"; //default path
nk.Window = null;
/* File Explorer Features (window.open)*/
nk.Features = new Dictionary(",","=");
/* If you wish to extend the Explorer.aspx and add more querystring parameters */
nk.Params = new Dictionary("&","=");
/* Network path control additional styling rules */
nk.Style = new Dictionary(";",":");
nk.Transform = function()
{
if (nk.Control)
{
/* Assign default path if control value is empty */
if (nk.Control.DataValue == null)
{
nk.Control.DataValue = nk.Path;
}
nk.Control.title = "Double Click to Open Network Explorer";
/* Default Window Settings */
if (!nk.Features.Exist("width"))
{
nk.Features.Add("width",700);
}
if (!nk.Features.Exist("height"))
{
nk.Features.Add("height",400);
}
if (!nk.Features.Exist("resize"))
{
nk.Features.Add("resize","yes");
}
if (!nk.Features.Exist("toolbar"))
{
nk.Features.Add("toolbar","no");
}
if (!nk.Features.Exist("menubar"))
{
nk.Features.Add("menubar","no");
}
if (!nk.Features.Exist("titlebar"))
{
nk.Features.Add("titlebar","no");
}
/* Attach validation to change and save events */
nk.Control.attachEvent( "onchange" , nk.Validate );
crmForm.attachEvent( "onsave" , nk.Validate );
/* Adjust control style */
nk.Style.Add("text-decoration","underline");
if (!nk.Style.Exist("color"))
{
nk.Style.Add("color","blue");
}
nk.Style.Add("cursor","hand");
nk.Control.style.cssText += ";" + nk.Style.ToString();
/* Add double click functionality */
nk.Control.ondblclick = nk.Open;
}
}
nk.Validate = function()
{
if (nk.Control.DataValue == null)
{
return true;
}
/* validate \\ unc path or a netwrok drive Y: */
var regex = new RegExp("^(\\\\|[a-zA-Z]:)");
if (!regex.exec(nk.Control.DataValue))
{
alert("Invalid Network Path or Drive");
return (event.returnValue = false);
}
return true;
}
nk.Open = function()
{
if (nk.Control.DataValue != null)
{
nk.Window = window.open( SERVER_URL + "/isv/explorer.aspx?path=" + nk.Control.DataValue + nk.Params.ToString() , "" , nk.Features.ToString());
}
}
nk.Close = function()
{
nk.Window.close();
}
/* Key Value Pair Collection */
function Dictionary(sep,delim)
{
this.list = [];
this.Seperator = sep;
this.Delimiter = delim
this.Add = function(key , value)
{
this.list[key] = value;
}
this.Remove = function(key)
{
this.list[key] = "";
}
this.Exist = function(key)
{
return this.list[key] != null && this.list[key] != "";
}
this.ToString = function()
{
var result = new StringBuilder();
result.Append(this.Seperator);
for(var key in this.list)
{
if (this.list[key]!="")
{
result.Append(key).Append(this.Delimiter);
result.Append(this.list[key]).Append(this.Seperator);
}
}
var tmp = result.ToString();
return tmp.substring(0,tmp.length-1);
}
}
function StringBuilder()
{
this.data = [];
this.Append = function(text)
{
this.data[this.data.length] = text;
return this;
}
this.Reset = function()
{
this.data = [];
}
this.ToString = function()
{
return this.data.join("");
}
}
}
OnCrmPageLoad();
________________________________________________________
link zum Blog: http://mscrm4ever.blogspot.com/2009/03/creating-network-path-text-control.html
Es ist nun so dass Explorer Fenster zwar geöffnet wird jedoch wird der neu ausgewählte Pfad nicht in der CRM Entität gespeichert. Sondern stattdessen bleibt der Standard Pfad erhalten.
Über entsprechende Anregungen würde ich mich sehr freuen.
Vielen Dank.
Andreas