you need to add a prime at the end of the context name, and delete it from the file name:
Needs["MATHPROG`LOGICPROGRAMMING`", "D:\\Mathematica\\Mathematica \
Programer II\\MATHPROG`LOGICPROGRAMMING.m"]
Also, are you sure your context in the .m file is in all capital letters like that? -- make sure to match the case of the Begin[...] in the .m file.