Get all the simple possible paths between two points in an undirected graph

I wrote a code to extract all the simple possible paths between two points in an undirected graph and mathematica takes too long running time and doesn’t yield any results/output. Any idea how to deal with this problem?
I am attaching my code.

Possible paths in terms of edges and not vertices.nb (157 KB)

It is because specifying the length of the path to infinity with a largely connected graph like yours, try to use a number instead and you will get your results.