How to get the program running path, named file by system time

I haven't updated my blog for a long time, so I still have no patience. Obtain the current path of the running program and the file named after the system time, and paste it here for reference!

Hresult getcurrentpath (string & strpath)
{
Tchar sfilename [_ max_path];
Tchar sfullname [_ max_path];
Tchar sdir [_ max_dir];

If (! (& Strpath ))
Return e_pointer;
Getmodulefilename (null, sfilename, _ max_path );
_ Splitpath (sfilename, sfullname, sdir, null, null );

Strpath = sfullname;
Strpath + = sdir;

Return s_ OK;

}

The nportnum can be used as sequential numbers.

Hresult getfilename (INT nportnum, string & strfilename)
{
Systemtime st;
Char filename [1024];
If (! (& Strfilename ))
Return e_pointer;

If (nportnum <0)
Return e_invalidarg;

Getsystemtime (& St );

ITOA (nportnum, filename, 10 );
Strfilename = strfilename + filename + "_";
ITOA (St. wyear, filename, 10 );
Strfilename = strfilename + filename + "_";
ITOA (St. wmonth, filename, 10 );
Strfilename = strfilename + filename + "_";
ITOA (St. wday, filename, 10 );
Strfilename = strfilename + filename + "_";
ITOA (St. whour, filename, 10 );
Strfilename = strfilename + filename + "_";
ITOA (St. wminute, filename, 10 );
Strfilename = strfilename + filename + "_";
ITOA (St. wsecond, filename, 10 );
Strfilename + = filename;
Strfilename + = ". txt ";

Return s_ OK;
}